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ABSTRACT 


CASTAG  is  an  interactive  two-sided  computer  wargame 
which  models  the  movement  and  detection  functions  for  the 
manual  naval  wargame  SEAT AG,  developed  at  the  Naval  War 
College.  CASTAG  is  programmed  for  the  CP/CMS  time  sharing 
system  on  the  IBM-360  at  the  Naval  Postgraduate  School. 
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INTRODUCTION  AND  BACKGROUND 


I 

i 

i 

A.  THE  NEED  FOR  AN  INTERACTIVE  COMPUTER  ASSISTED  WARGAME 
AT  THE  NAVAL  POSTGRADUATE  SCHOOL 

j  Several  curricula  at  NPS  study  wargaming  techniques, 

j  The  courses  include  manual  wargames  and  computer  simulations 

j  as  part  of  the  course  material.  At  the  inception  of  this 

I  study,  none  of  these  courses  had  access  to  an  interactive 

computer  assisted  wargane  that  could  handle  the  mundane  and 

l 

!  time  consuming  plotting  and  computational  chores  of  wargame 

|  bookkeeping. 

t 

The  Warfare  Environmental  Simulator,  WES,  is  currently 

3 

being  made  available  at  the  C  laboratory  at  the  Naval 
Postgraduate  School.  The  WES  program  is  run  at  the  Naval 
Ocean  Systems  Command  (NOSC)  in  San  Diego  with  outlying 
command  centers  such  as  the  C3  Lab  and  CINCPACLFT  in  Hawaii 
served  by  secure  data  link.  WES  games  will  be  played  on  a 
strategic  global  or  hemispheric  scale  and  will  try  to 
approach  real  time  data  handling. 

WES  has  several  drawbacks  for  use  in  a  general  unclassi¬ 
fied  wargaming  class  at  NPS.  WES  must  be  played  in  the  C3 
|  laboratory  and  depends  on  an  outside  program  located  in 

NOSC's  computers.  The  security  requirements  and  limited  use 
3 

of  the  C  laboratory  rule  out  extended  use  of  WES  at  NPS. 

In  addition,  scheduling  of  WES  games  to  support  all  curricula 
would  require  intercurricular  scheduling  and  concurrence  of 
NOSC. 


There  is  therefore  a  void  in  interactive  computer  assisted 
wargames  available  at  the  Naval  Postgraduate  School.  A 
medium  scale  naval  wargame,  tactical  in  scope  and  using  the 
computer  for  bookkeeping  functions  is  needed  to  fit  the  re¬ 
quirements  of  the  wargaming  courses.  An  additional  require¬ 
ment  would  be  for  a  game  to  aid  training  of  naval  officers 
in  tactical  decision  making.  A  game  is  needed  that  serves 
the  traditional  wargames  functions  of  tactical  analysis  and 
education. 

B.  APPROACHES  TO  THE  PROBLEM  AND  LIMITS  OF  THE  THESIS 

In  this  thesis  the  existing  manual  game  SEATAG  is  part¬ 
ially  progrcfinmed  and  implemented  on  the  hardware  currently 
installed  at  the  Naval  Postgraduate  School's  computing  facility. 
The  program  requires  less  than  two  cylinders  of  disk  space 
and  is  a  self-contained  game  employing  two  terminals  with 
appropriate  screening  of  information.  Changes  in  game  para¬ 
meters  can  be  entered  during  overall  program  execution.  The 
program  calculates  movement  and  processes  all  detections, 
with  actual  engagement  results  and  damage  determinations 
computed  manually.  The  program  also  provides  hard  copy  out¬ 
put  for  the  participants. 

C.  SELECTION  OF  SEATAG 

Selection  of  an  existing  manual  game  to  convert  to  an 
interactive  computer  assisted  program  rather  than  the  devel¬ 
opment  of  a  new  game  was  necessitated  by  this  project's 


completion  date.  SEATAG,  a  publication  of  the  Naval  War 
College,  was  selected.  SEATAG  has  the  advantage  of  being  an 
official  publication  with  reasonable  and  accepted  assumptions 
and  methodology.  The  SEATAG  model  used  for  this  thesis  is 
unclassified  and  does  not  contain  classified  performance 
data  on  the  various  platforms.  SEATAG  appealed  to  the 
author  since  it  emphasized  those  items  considered  important 
without  getting  involved  in  a  morass  of  detail. 

Although  there  was  a  constant  temptation  to  improve  SEATAG 
in  writing  this  thesis,  the  computer  program  is  as  consistent 
as  possible  with  the  rules,  procedures  and  assumptions  of 
the  manual  game. 

Throughout  the  remainder  of  the  thesis,  SEATAG  will  refer 
to  the  manual  game  in  its  second  edition  from  the  Naval  War 
College  and  CASTAG,  for  Computer  Assisted  SEATAG,  will  refer 
to  the  game  as  programmed  in  this  thesis . 

D .  CHAPTER  OUTLINE 

Chapter  II  of  this  thesis  examines  SEATAG  in  terms  of  the 
playing  area,  scale,  game  flow  and  procedures  for  engagements 
and  damage.  Chapter  III  describes  CASTAG  with  descriptions 
of  all  CASTAG  subprograms  and  models  as  well  as  how  inter¬ 
active  two  terminal  operation  was  achieved.  Chapter  IV  is 
a  user's  guide  to  the  CASTAG  program  with  emphasis  on  the 
inputs  and  outputs.  Chapter  IV  with  a  copy  of  the  SEATAG 
rules  is  sufficient  documentation  to  play  CASTAG.  Chapter  V 
includes  comments  on  playability  and  suggestions  for  additions 
and  improvements  to  the  CASTAG  program. 
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II.  SEATAG,  THE  MANUAL  GAME 


A.  HISTORY  AND  DEVELOPMENT  OF  SEATAG 

SEATAG,  Sea  Control  Tactical  Analysis  Game,  is  currently 
in  its  second  edition.  SEATAG  is  published  by  the  Center 
for  Advanced  Research  of  the  Naval  War  College. 

SEATAG  was  originally  developed  in  1975  as  a  research 
and  analytical  tool  for  evaluating  the  then  new  Harpoon  anti¬ 
shipping  missile  tactics.  The  second  edition  is  an  improved 
and  revised  game  which  is  available  in  an  unclassified 
version. 

B.  DESCRIPTION  OF  THE  PLAYING  AREA,  SCALE,  ENVIRONMENT 

AND  PLATFORM  CHARACTERISTICS  OF  SEATAG 

SEATAG  is  a  manual  naval  wargame  employing  two  opposing 
sides  Red,  Blue,  and  an  umpire  Control  Group.  SEATAG  re¬ 
quires  three  rooms  with  sufficient  desk  space  for  plotting 
and  record  keeping,  one  room  for  the  Control  Group  and  one 
for  each  side,  Red  and  Blue.  The  minimum  number  of  personnel 
required  to  play  SEATAG  is  three. 

The  Control  Group  performs  the  umpire  functions  of  intelli¬ 
gence  dissemination,  detection  and  damage  disclosures  and 
the  analysis  of  interactions  during  weapons  engagements.  A 
Game  Director  heads  the  Control  Group. 

SEATAG  comes  complete  with  several  grid  sheets  and  card¬ 
board  playing  pieces  to  represent  force  units  to  be  used 
as  the  master  plot.  The  grid  square  scale  may  vary  from 
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five  to  thirty  nautical  miles  per  grid  square  side.  Loca¬ 
tions  are  coded  by  a  four  digit  code  representing  the  center 
of  the  square  and  squares  can  be  subdivided  into  one  hundred 
sub  units. 

Capabilities  of  the  various  platforms  are  provided  on 
characteristics  in  Annex  C  of  the  SEATAG  Rulebook.  Char¬ 
acteristics  of  forty  types  of  modern  United  States  and 
Soviet  ships  and  aircraft  are  supplied.  The  SEATAG  data  has 
been  taken  from  editions  of  Jane's  All  the  Worlds  Fighting 
Ships  and  from  Combat  Fleets  of  the  World  1978/1979:  Their 
Ships,  Aircraft,  and  Armament. 

SEATAG  is  limited  to  two  environmental  conditions,  "good" 
weather  and  "bad"  weather.  One  or  both  may  be  used  in  a 
game.  Bad  weather  effects  aircraft  and  helicopter  operations 
in  the  same  manner  and  limits  all  surface  units  to  15  knots 
as  well.  Bad  weather  degrades  sensor  performance  in  terms 
of  range.  In  addition,  each  twenty-four  hour  day  is  divided 
into  light,  from  0600  to  1800,  with  the  remaining  12  hours 
dark  or  night.  The  only  effect  of  dark  is  to  prohibit 
visual  sightings,  and  any  air  operations  must  be  made  by 
IFR  (Instrument  Flight  Rules)  capable  aircraft. 

Rules  of  engagements  with  several  options  are  also 
included  in  the  SEATAG  Rulebook. 

A  supplemental  resource  variation  is  included  with 
hypothetical  costs  for  the  units.  These  costs  are  useful 
in  determining  the  relative  balance  of  a  given  scenario. 
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C.  GAME  FLOW,  AIRCRAFT  CARRIER  AND  SUBMARINE  OPERATIONS, 

AND  SURVEILLANCE/INTELLIGENCE  PLAY 

The  game  flow  is  graphically  depicted  in  Figure  1. 

The  initial  decision  for  each  turn  is  the  time  duration 
of  that  turn.  This  is  specified  by  the  umpires  who  look 
ahead  to  see  what  the  engagement  intensity  is  likely  to  be. 
The  minimum  time  step  is  twenty  minutes  if  the  smallest  grid 
size  is  being  used.  A  one  hour  minimum  is  specified  for  the 
larger  grid  scales.  Red  and  Blue  then  make  their  moves  and 
specify  any  engagement  intentions  to  the  Control  Group  who 
then  record  the  moves  and  disclose  any  detections  to  the 
appropriate  sides.  The  Red  and  Blue  command  centers  then 
adjust  moves  based  on  this  information.  Umpires  play  out 
the  adjusted  moves,  play  engagements,  and  provide  each  side 
with  results,  additional  detections  and  the  time  length  of 
the  next  move.  The  adjustment  phase  allows  units  to  respond 
to  detections  as  they  occur  rather  than  wait  until  the  end 
of  the  game  move. 

The  SEATAG  rules  provide  a  number  of  tactical  hints  on 
ship  positioning,  task  group  organization  and  submarine  war¬ 
fare.  In  addition  a  CV  operations  section  provides  a  simpli 
fied  but  realistic  approach  to  CV  cyclical  air  operations. 

An  around-the-clock  defensive  posture  is  provided  along  with 
a  selection  of  surge  capabilities  against  various  threats. 

Surveillance  and  intelligence  has  been  distilled  into 
three  levels.  Each  side  is  assigned  or  allowed  to  procure 
Level  I,  II,  or  III.  At  each  day  of  play  at  times  0001, 
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0601,  1201,  and  1801  a  random  number  is  drawn  for  each 
surface  ship,  radiating  aircraft  and  submarine  traveling  in 
excess  of  fiteen  knots.  In  addition  another  random  number 
is  drawn  each  time  a  unit  uses  HF  equipment.  The  number 
drawn  in  both  cases  is  used  with  supplied  tables  to  determine 
the  level  of  information  to  be  provided  to  the  other  side. 

The  level  ranges  from  location  information  only  to  complete 
identification,  course  and  speed.  Units  in  EMCON  are  less 
likely  to  have  information  divulged  than  those  radiating. 

Civilian  ships  and  aircraft  may  be  included  in  the 
scenario  and  are  operated  by  the  Control  Group.  Merchants 
are  not  allowed  to  operate  in  a  military  capacity  except  as 
part  of  a  convoy. 

D.  DETECTIONS 

A  detection  opportunity  occurs  when  a  unit  comes  within 
range  of  any  sensor.  The  information  provided  when  a  detec¬ 
tion  occurs  consists  of  bearing  only  for  ESM  detections  and 
complete  information  including  course,  speed,  altitude  or 
depth  and  grid  posit  for  most  other  sensors.  Sonobuoys  are 
an  exception,  with  the  amount  of  information  determined  by 
the  RN  generated  when  the  detection  was  processed.  Additional 
information,  like  ship  or  aircraft  type  and  other  character¬ 
istics,  is  left  totally  to  the  discretion  of  the  umpires. 

E.  PLAY  OF  ENGAGEMENTS  AND  CALCULATION  OF  DAMAGE 

In  SEATAG,  engagement  analysis  is  segregated  into  unit 
versus  unit  interactions  which  are  treated  in  a  logical  order 


determined  by  when  they  take  place.  The  Control  Group  is 
responsible  for  this  function.  The  Control  Group  includes 
a  Red  and  a  Blue  chief  umpire  responsible  for  playing  the 
engagements  for  their  "side",  including  tactical  decisions 
as  required  within  the  framework  of  specific  operation 
orders  or  rules  of  engagement. 

Tables  and  curves  are  provided  to  calculate  required 
information  such  as  targeting,  weapon  expenditures  and  number 
of  hits  inflicted  on  a  target. 

F.  TIME  UTILIZATION  AND  SOME  OBSERVATIONS  ON  ACTUAL 

MANUAL  PLAY 

SEATAG  documentation  states  that  30  to  60  minutes  will  be 
required  for  the  Control  Group  to  process  each  move  or  turn. 
Most  likely,  80%  of  that  time  is  spent  plotting  and  doing 
movement  and  Closest  Point  of  Approach  (CPA)  calculations. 
However,  engagement  analysis,  once  the  CPA  calculation  is 
made,  is  relatively  straightforward  and  quick. 
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III.  THE  CASTAG  PROGRAM 

A.  OVERALL  PROGRAM  OPERATION 

CASTAG  consists  of  the  CASTAG  EXEC  and  three  FORTRAN 
programs  -  SEARCH,  CHANGE,  and  UPDATE.  CASTAG  EXEC  executes 
the  FORTRAN  programs  in  the  specified  order.  SEARCH  processes 
the  input,  movement,  detection  and  output  functions  for  one 
game  turn.  CHANGE  provides  the  user  the  option  to  change  any 
unit  parameters  prior  to  the  next  game  move.  UPDATE  com¬ 
bines  each  terminal's  inputs  into  an  updated  data  base  ready 
for  the  next  game  move. 

Prior  to  execution,  each  terminal  must  have  access  to  a 
disk  containing  a  compiled  version  of  the  three  FORTRAN  pro¬ 
grams  and  the  CASTAG  EXEC  program.  In  addition,  one  terminal 
must  have  access  to  the  data  base. 

Figure  2  provides  an  overall  program  flowchart  showing 
terminal  interaction,  file  management,  and  input/output. 

1 .  Overview  of  CASTAG  Inputs 

CASTAG  inputs  can  be  considered  in  two  groups.  First 
is  the  data  base  created  by  the  Control  Group.  The  data 
base  is  discussed  in  Section  D  of  this  chapter.  Second  is 
the  terminal  inputs  required  by  CASTAG  EXEC,  SEARCH,  and 
CHANGE.  The  program  functions  associated  with  these  inputs 
are  discussed  in  this  chapter  under  the  appropriate  program. 
Chapter  IV  discusses  these  same  inputs  from  the  point  of 
view  of  user  data  entry  and  as  game  parameters. 
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Two  terminal  operation  can  only  be  accomplished  by 
each  terminal  accessing  and  executing  identical  programs  in 
tandem.  The  programs  are  designated  Red  or  Blue  by  an  input 


at  the  terminal.  At  the  NPS  computer  center  this  is  the 
only  manner  in  which  this  kind  of  a  two  sided  game  can  be 
played. 

3.  Description  of  the  CASTAG  EXEC  Routine 

CASTAG  EXEC  executes  the  three  compiled  FORTRAN  pro¬ 
grams  and  manages  the  file  transfers  between  terminals. 

The  CASTAG  program  begins  with  a  one  time  interactive 
sequence  in  which  the  User  Identification  number  of  the  other 
player  is  input  to  identify  the  other  terminal  for  data 
transfers . 

If  required,  the  data  base  is  transferred  to  the 
terminal  without  it. 

The  program  CHANGE  is  then  executed  at  each  terminal 
by  CASTAG  EXEC.  CHANGE  processes  changes  entered  by  the 
user  to  a  unique  data  file  containing  the  Red  or  Blue  part 
of  the  data  base  at  each  terminal.  Following  an  entry  to 
identify  the  terminal  as  Red  or  Blue,  an  interactive  sequence 
at  each  terminal  manages  the  cross  transfer  of  these  two 
data  files  so  each  terminal  has  the  same  information.  The 
UPDATE  program  is  then  executed  resulting  in  each  terminal 
having  a  new  but  identical  data  base.  Finally,  the  user 
is  given  the  option  to  play  another  turn  or  stop. 


20 


Hi  .  -  . 


B.  SELECTION  OF  THE  PROGRAMMING  LANGUAGES 

FORTRAN  IV  (G)  was  selected  as  the  programming  language 
for  CASTAG  because  it  is  a  widely  used  and  standardized 
language.  The  choice  of  FORTRAN  allows  the  utilization  of 
CASTAG  on  other  machines  and  systems  in  locations  other  than 
NPS . 

The  CASTAG  EXEC  routine  is  written  in  the  Control  Program  - 
67/Cambridge  Monitoring  System  (CP/CMS)  EXECUTIVE  language. 
Implementation  of  CASTAG  on  another  computer  system  not 
using  CP/CMS  would  require  reprogramming  in  that  system's 
file  handling  language. 

C.  FILE  SPACE  AND  CPU  TIME  REQUIREMENTS  OF  THE  CASTAG 

PROGRAM 

CASTAG  uses  approximately  186k  bytes  or  233  records  of 
disk  storage.  This  requirement  is  compatible  with  the  nor¬ 
mal  two  cylinders  of  disk  space  assigned  to  a  user  at  the 
NPS  Computer  Center. 

Table  1  lists  the  program  and  data  files  and  record  lengths 
which  make  up  the  CASTAG  program.  The  source  code  (FORTRAN) 
versions  are  listed  for  reference  but  are  not  required  to 
remain  on  the  disk  once  compiled.  They  are  not  included 
in  the  total  space  requirement. 

The  largest  of  the  three  is  SEARCH  which  takes  40  seconds 
to  compile  and  from  10  to  12  seconds  of  CPU  time  to  execute. 
UPDATE  and  CHANGE  run  very  vast.  The  time  they  take  is 
dependent  on  the  number  of  user  inputs . 


'  Table  1 

Cylinder  Space  Requirements  for  CASTAG 

FILE  NAME  FILE  TYPE  NO.  RECORDS  NO.  RECORDS 

(20  units/side)  (50  units/side) 


CASTAG 

EXEC 

9 

9 

SEARCH 

FORTRAN 

77 

77 

SEARCH 

TEXT 

63 

63 

UPDATE 

FORTRAN 

4 

4 

UPDATE 

TEXT 

4 

4 

CHANGE 

FORTRAN 

10 

10 

CHANGE 

TEXT 

8 

8 

FILE 

FT01F001 

10 

125 

FILE 

FT02F001 

5 

12 

FILE 

FT03F001 

3 

6 

FILE 

FT04F001 

3 

6 

D.  CREATION  AND  ORGANIZATION  OF  THE  DATA  BASE 
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The  data  base  contains  current  game  time,  the  total 
number  of  units  on  each  side,  and  all  the  parameters  for 
every  unit  in  the  game.  The  data  base  stores  the  information 
from  turn  to  turn  to  provide  game  continuity. 

The  data  base  is  created  prior  to  the  start  of  the  game 
using  CP/CMS  input  and  edit  functions  and  placed  on  a  data 
file.  This  file  is  created  by  the  player  and  must  be  labeled 
"FILE  FT02F001".  Once  CASTAG  execution  has  begun,  the  data 
base  normally  is  never  accessed  or  changed  by  the  user 
throughout  the  entire  game. 

1 .  Information  Required  for  the  Data  Base 

Game  start  time,  number  and  type  of  units  per  side, 
each  unit's  initial  position,  course,  and  speed  are  required 
from  the  Control  Group  or  Game  Director. 

Each  unit  must  have  a  unique  four  digit  identifica¬ 
tion  number  assigned  during  creation  of  the  data  base.  In 
addition,  each  unit  is  assigned  a  second  identifying  number 
called  a  type  number.  Directions  for  assigning  and  decoding 
these  type  numbers  are  located  in  Chapter  IV  of  the  thesis. 

The  rest  of  theparameters  required  for  each  unit  are 
found  in  Annex  C  of  the  SEATAG  rulebook.  Characteristics 
of  two  additional  units  are  included  in  Appendix  A  of  the 
thesis . 

2.  Organization  and  Format  of  the  Data  Base 

The  first  row  always  contains  the  current  game  time 
in  minutes,  the  number  of  Red  units  and  the  number  of  Blue 


l! 


23 


A 


units.  Each  of  the  following  rows  represents  one  ship, 
submarine,  or  aircraft.  All  Red  units  are  listed  first 
followed  by  all  Blue  units.  Units  are  not  required  to  be 
in  any  particular  order  as  regards  aircraft,  ships,  or  sub¬ 
marines.  Each  column  in  a  row  contains  the  parameters  for 
a  particular  unit.  Each  column's  description  is  provided 
in  Table  2 . 

The  current  game  time  is  read  from  the  data  base 
in  format  F6.0  by  the  FORTRAN  programs.  The  number  of  Red 
units  and  the  number  of  Blue  units  is  read  in  format  213. 

All  the  rest  of  the  data  base  is  read  in  by  row  as  1514. 

All  entries  must  be  right  justified.  An  integer  format 
was  selected  to  facilitate  input  and  output  formatting. 

Table  3  is  an  example  of  how  a  correctly  formatted  data  base 
appears  on  file. 

The  data  base  shows  6  Red  and  6  Blue  units.  Game 
time  is  420  minutes. 

E.  PLAYING  AREA,  TIME  AND  DISTANCE  UNITS 

The  game  area  is  the  positive  quadrant  of  the  cartesian 
plane.  A  unit's  location  is  expressed  as  an  (  ,  )  co-ordinate 
to  the  nearest  nautical  mile.  The  maximum  X  or  Y  value  is 
9999.  Units  with  an  X  or  Y  value  greater  than  1000  will  not 
be  plotted  on  the  output. 

Game  time  is  computed  to  the  nearest  minute  and  it  is 
therefore  possible  to  play  game  turns  of  as  little  as  one 
minute  in  duration.  Speeds  are  computed  to  the  nearest 
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TABLE  2 


Data  Base  Column  Descriptions 


ARRAY 

COLUMN 

FIELD 

DESCRIPTION 

1 

1-4 

Unit  Identification  number.  Each  unit 
in  the  game  must  have  a  unique  1  to  4 
digit  unit  ID.  An  ID  of  0000  is  reserved 
for  units  not  in  play.  The  unit  ID  is 
not  used  by  the  program  except  to  check 
if  a  unit  is  in  play. 

2 

5-8 

Unit’s  current  speed  in  knots. 

3 

9-12 

Altitude  or  depth  of  the  unit.  Altitude 
for  aircraft  is  in  thousands  of  feet. 
Surface  units  must  be  at  0.  Submarines 
may  be  deep  (2) ,  shallow  (1) ,  or 
surfaced  (0) . 

4 

13-16 

Unit's  course  in  degrees  true. 

5 

17-20 

X  coordinate  of  the  unit  in  m.m. 

6 

21-24 

Y  coordinate  of  the  unit  in  n.m. 

7 

25-28 

Type  identification  number.  Each  digit 
represents  coded  information  which  is 
tabulated  in  Table  of  Chapter  IV. 

8 

29-32 

Unit 1 s  maximum  speed  in  knots . 

9 

33-36 

Surface  search  radar  maximum  range  in  n.m. 

10 

37-40 

Air  search  radar  maximum  range  in  n.m. 

11 

41-44 

Sonar  maximum  range  in  n.m. 

12 

45-48 

Status  of  surface  search  radar.  1  =  On, 

0  =  Off. 

13 

49-52 

Status  of  air  search  radar.  1  =  On, 

0  =  Off. 

14 

53-56 

Status  of  sonar.  1  =  On,  0  =  Off. 

15 

57-60 

Status  of  HF  communication  equipment. 

1  =  On,  0  =  Off. 

Table  3 
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Sample  Data  Base 


420 

.  6 

6 

50 

30 

0 

160 

563 

4511332 

51 

10 

0 

160 

545 

4881333 

52 

10 

0 

160 

547 

4481346 

60 

7 

1 

100 

546 

4701110 

0 

0 

20 

90 

900 

5001281 

71 

10 

1 

225 

510 

5101293 

1011 

10 

1 

95 

550 

4732110 

1022 

2 

2 

90 

537 

4762111 

333 

11 

0 

90 

495 

4802333 

444 

12 

0 

90 

510 

4762321 

555 

17 

0 

90 

521 

4912347 

666 

30 

0 

90 

537 

4612347 

34 

25 

150 

10 

1 

1 

1 

35 

20 

150 

10 

0 

0 

0 

34 

20 

150 

10 

0 

0 

0 

30 

100 

0 

30 

0 

0 

0 

450 

200 

0 

0 

1 

0 

0 

120 

30 

30 

2 

1 

0 

1 

30 

10 

0 

30 

0 

0 

0 

34 

10 

0 

30 

0 

0 

0 

30 

20 

150 

5 

0 

0 

1 

33 

25 

150 

5 

1 

1 

0 

27 

20 

150 

14 

1 

1 

0 

27 

20 

150 

14 

1 

1 

1 

26 
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All  distances  in  CASTAG  are  expressed  in  nautical  miles 
(n.m.)  and  all  speeds  in  knots. 

F.  DESCRIPTION  OF  FORTRAN  PROGRAM  SEARCH 

SEARCH  models  the  movement  and  detection  elements  for 
one  game  turn  of  the  manual  game.  SEARCH  is  the  first  pro¬ 
gram  executed  by  CASTAG  EXEC. 

SEARCH  consists  of  a  main  program  and  ten  subroutines. 


These 

are: 

1. 

Subroutine 

MOVE  (TIME) 

2. 

Subroutine 

NUMBER 

3. 

Subroutine 

DETECT 

(TIME) 

4. 

Subroutine 

SPOOK 

5. 

Subroutine 

ESM  (I) 

6. 

Subroutine 

DETRAD 

(I) 

7. 

Subroutine 

ASONAR 

(I) 

8. 

Subroutine 

NLP CPA 

(If 

TIME) 

9. 

Subroutine 

VISUAL 

(1, 

ITYPE) 

10. 

Subroutine 

PSONAR 

(If 

I PLAT) 

The  main  program  will  be  described  first  followed  by 
the  ten  subroutines  which  make  up  SEARCH.  Each  of  the 
eleven  sections  includes  a  list  of  local  variables  used  and 
a  plain  language  flowchart  for  that  subroutine. 

SEARCH  uses  two  computer  library  routines,  UTPLOT  and 
LLRANDOM.  UTPLOT  is  a  utility  plotting  routine  available 
in  the  SSPLIB  library  at  the  NPS  Computer  Center.  This  rou¬ 
tine  will  plot  more  than  one  set  of  points  on  a  graph  with 
a  different  symbol  for  each  call. 

LLRANDOM  is  used  to  deliver  arrays  of  single  precision 
U(0,1)  distributed  pseudo  random  numbers  ac  various  locations 
in  SEARCH.  LLRANDOM  is  accessed  by  CALL  RANDOM. 


SEARCH  uses  an  extensive  common  block,  which  is  identi¬ 
cal  for  all  the  subroutines.  Many  variables  and  arrays 
in  common  are  used  repeatedly  throughout  the  program.  Some 
are  used  in  every  subroutine.  Definitions  of  the  variables 
in  the  common  block  are  found  in  Table  4.  The  arrays,  all 
of  which  are  in  the  common  block,  are  defined  in  Table  5. 
Referring  back  to  these  two  tables  will  be  necessaary  as 
the  information  is  not  repeated  in  the  subroutine  description 
1.  MAIN  Program 

The  MAIN  program  dimensions  all  arrays,  initializes 
variables,  zeros  out  arrays,  reads  the  data  base  from  the 
file,  reads  the  user's  terminal  inputs,  and  either  calls 
subroutine  NUMBER  or  reads  the  random  number  file.  Following 
the  call  to  subroutine  MOVE,  the  data  base  with  the  new  X,Y 
locations  for  each  unit  is  read  back  onto  the  original  file 
and  two  new  files  are  created,  each  with  only  Red  or  Blue 
data.  Next,  a  call  to  subroutine  DETECT  calculates  all 

i 

detections  for  the  game  turn.  Finally,  UTPLOT  is  utilized 
to  output  two  plots  on  the  offline  printer. 

The  MAIN  program  is  executed  by  CASTAG  EXEC.  MAIN 
calls  three  subroutines  directly:  NUMBER,  MOVE,  and  DETECT. 
This  turn's  game  time  is  supplied  to  MOVE  and  DETECT  as  an 
argument.  Library  routine  UTPLOT  is  called  as  follows: 

CALL  UTPLOT  (XPLOT,  YPLOT,  NUNIT,  R,  1,  NGRAPH) 
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Description  of  Variables  in  the  SEARCH  Common  Block 


DTIME 

EPS 

ID 

IFOE 

ISEED1 

I SEED  2 

ISEED  3 

NRED 

NBLUE 

NCOL 


NMAX 


NWRITE 


ZTIME 


Current  game  turn ' s  length  in  minutes 

Used  to  check  for  zero  in  the  denominator 
prior  to  division.  Set  to  .001. 

Tells  program  whether  it  is  Red  of  Blue.  Also 
used  as  third  subscript  to  access  the  friendly 
information  in  array  DATA. 

Third  subscript  used  to  access  opponents 
information  in  array  DATA.  Set  opposite  of  ID. 

Random  number  generator  seed  used  to  determine 
permanent  percentage  of  maximum  detection  range 

Random  number  seed  for  numbers  generated 
determining  HFDF  detections. 

Random  number  seed  for  numbers  generated  to 
determine  intelligence  detections. 

Number  of  Red  units.  Read  from  the  data  base. 

Number  of  Blue  units.  Read  from  the  data  base. 

Maximum  number  of  columns  allowed  to  be  used 
for  information  storage  in  the  data  base  and 
in  array  DATA.  Set  to  15.  Maximum  allowed 
by  array  dimension  is  20. 

Maximum  number  of  units  that  will  have  random 
numbers  generated  for  them.  Set  to  20. 

Maximum  allowed  by  array  dimension  is  50. 

Used  to  designate  the  off-line  printer  as  the 
output  device  for  a  FORTRAN  WRITE  statement. 

Set  to  6. 

Current  culmulative  game  time  in  minutes. 

First  number  read  from  data  base. 
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Table  5 


DEFINITIONS  OF  ARRAYS  IN  SEARCH  COMMON  BLOCK 


CPA  (50,  2)  Read  array  holding  calculated  ranges  in 

column  1  and  bearings  in  column  2  of  CPA's 
for  up  to  50  units 

DATA  (50,  20,  2)  Integer  array  in  which  the  2nd  and  subsequent 

lines  of  the  data  base  are  stored  in.  Each 
row  holds  the  information  for  one  unit, 
usually  subscripted  by  I.  The  Jth  column 
holds  the  Jth  parameter  for  the  Ith  unit. 

The  columns  have  the  same  meaning  as  in 
the  data  base.  The  K  =  1  level  is  all  the 
Red  units'  data.  The  K  =  2  level  is  all  the 
Blue  units'  data.  Note  that  only  15  of  the 
20  available  spaces  for  unit  data  are  used. 

DICE  (50)  Real  array  used  to  hold  up  to  fifty  U(0,1) 

random  numbers  from  a  call  to  LLRANDOM. 


ESMDET  (100,  5) 


Integer  array  holding  ESM  detection  data. 
Each  row  holds  all  the  information  for  a 
single  detection.  Columns  one  through  five 
are  interpreted  as  follows: 


Column 

1 

2 

3 


4 

5 


Info 

Type  of  radar  detected 
Bearing  of  that  radar 
at  CPA 

2nd  and  3rd  digits  of 

type  number  of  the  detected 

unit 

Unit  ID  of  emitting  unit 
Range  of  CPA  of  detected 
radar 


HFDF  (50,  4)  Integer  array  holding  HFDF  detection  data. 

Each  holds  all  the  information  for  a  single 
detection  of  a  unit.  Columns  one  through 
four  are  interpreted  as  follows: 


Column  Info 

1  Unit  ID  of  detected  unit 

2  Type  number  of  detected 
unit 

3  X  coordinate  of  detected 
unit 

4  Y  coordinate  of  detected 
unit 
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Table  5  (Continued) 


INTEL  (50,  6)  Integer  array  holding  data  revealed  during 

an  intelligence  segment.  Each  row  contains 
all  the  information  on  a  single  detected 
unit.  Columns  one  through  six  are  inter¬ 
preted  as  follows: 

Info 

Unit  ID  of  detected  unit 
First  two  digits  of  type 
number  of  detected  unit 
Second  two  digits  of  type 
number  of  detected  unit 
Course  of  unit  detected 
to  nearest  10  degrees 
X  coordinate  of  unit 
detected 

Y  coordinate  of  unit 
detected 

MINDEX  (10)  Integer  array.  First  nine  locations  not 

used.  MINDEX  (10)  holds  the  total  number 
of  detected  units  that  will  be  plotted. 

NROW  (2)  Integer  array  holding  number  of  units  on 

each  side.  Set  to  NROW  (1)  =  NRED , 

NROW  (2)  =  NBLUE 

PRMAX  (50,  50,  5)  Real  array  holding  the  calculated  permanent 

percentage  of  maximum  detection  range  for 
each  sensor  of  each  unit  against  every 
enemy  unit.  With  (I,J,K)  as  the  subscripts, 
the  number  represents  the  Kth  sensor  on 
the  Ith  unit  trying  to  detect  the  Jth 
enemy  unit.  The  Kth  sensor  are: 

K  Sensor 

1  Surface  search  radar 

2  Air  search  radar 

3  ESM 

4  Active  sonar 

5  Passive  sonar  and  passive 

sonar  ESM 

R  (4)  Real  array  holding  the  grid  limits  of  the 

X  and  Y  values  for  the  plotting  routines. 

R(l)  =  1000.0  Maximum  X 

R(2)  =  0.0  Minimum  X 

R(3)  =  1000.0  Maximum  X 

R(4)  =  0.0  Minimum  Y 


Column 

1 

2 

3 

4 

5 

6 


Table  5  (Continued) 


RADAR  (50,  20) 


Integer  array  holding  all  radar  and  visual 
detection  data.  The  first  ten  columns  are 
used  for  radar  data,  the  second  ten  for 
visual  data.  Each  half  row  represents  the 
detection  of  a  unit.  The  columns  are 
interpreted  as  follows: 


;  Column 

Radar 

Column 

Visual 

1 

Unit  ID 

11 

Unit  type  number 

!  2 

Unit  type  number 

12 

Unit  altitude 

!  3 

\ 

Radar  type 
(air/surf) 

13 

Course  in  deg  T 

!  4 

Course  (T) 

14 

X  coord 

!  5 

X  coord 

15 

Y  coord 

|  6 

Y  coord 

16 

Bearing  at  CPA 

7 

Speed 

17 

Composition 

Target  composi¬ 
tion 

18 

Range  at  CPA 

)  9 

Range  at  CPA 

19 

Unit  ID 

1  10 

Bearing  at  CPA 

20 

Not  used 

SONAR  (50,  20) 


Integer  array  holding  active  sonar,  passive 
sonar,  and  sonar  ESM  detection  data.  The 
first  ten  columns  are  used  for  active  detec¬ 
tions  and  the  second  ten  for  passive  and 
ESM  detections.  Each  half  row  represents 
the  detection  of  a  unit.  Columns  used  as 
follows : 


Column 

Active 

Column 

Passive 

1 

Unit  ID 

11 

Unit  ID 

2 

Unit  type 

12 

Target  type  number 

3 

Unit  depth 

13 

Unit  depth 

4 

Unit  course 

14 

Unit  course 

5 

X  coord 

15 

X  coord 

6 

Y  coord 

16 

Y  coord 

7 

Unit  speed 

17 

Unit  speed 

8 

Range  at  CPA 

18 

Range  at  CPA 

9 

Bearing  at  CPA 

19 

Bearing  at  CPA 

10 

Not  used 

20 

Not  used 

XPLOT  (50) 


YPLOT  (50) 


Real  arrays  holding  the  X  coordinates  of 
units  to  be  plotted  by  UTPLOT. 

Real  arrays  holding  the  Y  coordinates  of 
units  to  be  plotted  by  UTPLOT. 
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XPLOT  and  YPLOT  are  explained  in  Table  5.  R  and  NUNIT  are 
explained  in  the  local  variable  definitions.  The  fifth 
parameter,  1,  tells  the  routine  to  plot  every  (X,Y)  point. 
NGRAPH  can  equal  1,  2,  or  3  indicating  if  this  is  the  first 
(1),  last  (3),  or  an  intermediate  (2)  set  of  points  to  be 
plotted  on  a  graph. 

MAIN  reads  all  the  data  from  disk  files  required  by 
SEARCH  except  for  three  user  supplied  terminal  inputs. 

These  are  a  random  number  seed,  the  length  in  minutes  of 
the  current  game  turn,  and  whether  the  terminal  is  Red  or 
Blue.  These  are  discussed  in  Chapter  IV.  However,  the 
turn  length  and  game  time  control  some  additional  program 
functions  not  apparent  to  the  user. 

The  program  expects  to  begin  the  first  turn  at  time 
0000.  In  order  to  generate  the  initial  PRMAX  array  either 
ZTIME  must  be  zero  or  the  turn  length  (TIME)  must  be  zero. 
Consequently,  to  start  at  an  initial  game  time  other  than 
0000,  the  length  of  the  first  turn  must  be  input  as  zero. 
Note  that  in  this  case  no  movement  or  detections  are  carried 
out;  only  the  random  numbers  are  generated  by  NUMBER.  Any 
time  a  game  turn  of  zero  minutes  is  played,  the  only  effect 
is  to  regenerate  the  PRMAX  array  with  different  values. 

Table  6  lists  the  local  variables  in  this  routine. 
Figure  3  is  a  flowchart  of  this  routine. 
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Table  6 


MAIN  Program,  Local  Variables 


DISK  Designate  which  of  four  files  will  input  or  output 
for  a  READ  or  WRITE  statement  as  defined  below: 


Variable  Value 


File  Type 


Purpose 


IDISK 

1 

FT01F001 

NDISK 

2 

FT02F001 

RDISK 

3 

FT03F001 

BDISK 

4 

FT04F001 

Stores  DRMAX  array 
Stores  ZTIME,  NRED,  NBLUE 
and  DATA  array 

Stores  Red  part  of  DATA  array 
Stores  Blue  part  of  DATA 
array 


IMIN  Number  of  minutes  into  latest  hour  played  thus  far. 


KSEED  Random  number  seed  entered  by  user. 

KTIME  Calculated  number  of  hours  played  thus  far. 

M  Number  of  opposing  units  detected  that  are  to  be 

plotted  on  the  first  plot. 

NGRAPH  Parameter  for  plotting  routine  designating  number 
of  sets  of  points  on  that  particular  plot. 

NREAD  Input  device  for  FORTRAN  READ  statement.  Set  to  5. 

NSHIP  Maximum  number  of  units  arrays  can  hold.  Set  to  50. 

NTERM  Output  device  for  FORTRAN  WRITE  statement.  Set  to  5. 

NUNIT  Number  of  opposing  units  to  be  plotted  on  second  plot. 


TIME 


Length  of  current  turn  in  minutes;  entered  by  user. 


* 


Declare  Integer  variables] 
Dimension  arrays 
Declare  common  block 
Initialize  variables 


Read  user  inputs  from  terminal 
and  set  random  number  seeds. 


"Read  first  line 
of  data  base 


Zero  out  arrays 


Read  the  rest  of 
the  data  base 


c 


Call  NUMBER 


If  game  time-0  \ 
or  if  turn  lengthV 
is  0  / 


NO. 


Read  RN  file 


I 


REWIND  random  number  file 
Update  game  time 

i 


If  turn  length  greater  than  0,  call  MOVE 
REWIND  data  base  file 

Write  data  base  back  on  3  files  I 

If  turn  length  greater  than  0,  call  DETECT  j 


(ca 


Call  UTPLOT  as  required 


^STOP^) 


0 


Flowchart  of  SEARCH  MAIN  Program 
Figure  3 
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2 .  Subroutine  MOVE 


Subroutine  MOVE  calculates  new  X  and  Y  coordinates 
for  each  Red  and  Blue  unit  as  a  function  of  course  and  dis¬ 
tance  traveled.  If  a  unit  crosses  the  X  or  Y  axis  from  the 
positive  quadrant,  the  Y  or  X  coordinate  respectively  is 
set  to  zero,  keeping  the  unit  in  the  positive  quadrant.  Equa 
tion  (1)  shows  the  calculation  of  a  new  X  coordinate;  the 
new  Y  coordinate  is  calculated  in  a  similar  manner  using 
the  cosine  function. 

New  X  =  Old  X  +  (. 5 +  Distance  *  sin  (course))  (1) 

One-half  is  added  so  that  when  the  value  is  truncated 
for  storage  as  an  integer,  it  in  effect  rounds  off  to  the 
nearest  nautical  mile. 

Subroutine  MOVE  is  called  once  per  game  turn  from 
the  MAIN  program.  The  turn's  length  in  minutes  is  passed 
as  an  argument.  Table  7  defines  the  local  variables  and 
Figure  4  is  the  flowchart  for  this  subroutine. 
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Table  7 


THOUR 

RAD 

DIST 

THETA- 

I 

K 


Subroutine  MOVE,  Local  Variables 

Length  of  the  turn  in  hours . 

Converts  degrees  to  radians.  Set  to 
it/180. 

Distance  the  Ith  unit  moved  this  turn. 

Course  of  the  Ith  unit  converted  to  radians. 

Subscripts  the  row  (unit)  in  array  DATA. 

Subscripts  array  DATA  designating  Red  or 
Blue. 
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3.  Subroutine  NUMBER 


Subroutine  NUMBER  draws  a  U(0,1)  random  number  and 
calculates  the  percent  of  maximum  range  at  which  a  detection 
can  occur  for  every  sensor  on  every  unit  versus  every  target 
unit.  A  U(0,1)  random  number  is  drawn  for  every  possibility, 
regardless  of  whether  a  particular  unit  has  a  particular 
sensor  or  can  ever  be  detected  by  a  particular  sensor. 

SEATAG  uses  an  empirically  derived  curve  to  manually 
transform  the  random  number  into  a  percent  of  maximum  range. 
This  curve  was  approximated  by  the  hyperbola  in  Equation  (1) , 
where  X  equals  the  percent  of  maximum  detection  range 
(PRMAX)  and  Y  is  a  U(0,1)  random  number. 


1.0 


(1) 


The  hyperbola  is  graphed  with  the  original  curve  for  compari¬ 
son  in  Figure  5. 

Note  that  the  X  and  Y  aixs  in  Figure  5  have  different 
scales.  The  maximum  error,  determined  graphically,  is  2% 
of  the  maximum  range.  Subroutine  NUMBER  uses  Equation  (2) 
which  is  Equation  (1)  solved  for  X  to  calculate  the  actual 
PRMAX  values. 


X  =  .81  -  Y2  (2) 

Subroutine  NUMBER  is  usually  called  by  MAIN  only  on  the 
first  game  turn.  Thereafter  the  calculated  values  are 
stored  from  turn  to  turn  on  a  file. 
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Flowchart  for  Subroutine  NUMBER 


4 .  Subroutine  DETECT 


The  most  important  and  complex  subroutine  in  SEARCH 
is  the  DETECT  subroutine.  The  subroutine  comprises  three 
functional  sections.  First,  it  must  decide  if  the  current 
turn  includes  a  surveillance  opportunity.  Next,  intelli¬ 
gence  from  enemy  units  using  HF  communication  is  determined. 

Last,  every  eligible  friendly  unit  is  given  the  opportunity 
to  detect  eligible  targets  subject  to  sensor,  speed,  and 
platform  limitations. 

For  HFDF  intelligence  purposes,  the  program  assumes 
that  each  side  has  procured  level  I  intelligence.  Accordingly, 
the  only  information  provided  is  the  grid  position  of  the 
enemy  unit  detected. 

DETECT  performs  the  umpire  function  of  deciding  which 
sensors  may  be  used  against  which  targets  under  what  circum¬ 
stances.  Some  ground  rules  for  this  are  implicit  in  the 
flowchart  and  some  explicitly  explained  in  the  following 
paragraphs . 

The  program  gives  submarines  at  shallow  depth  some 
of  the  capabilities  associated  with  a  submarine  at  periscope 
depth.  In  particular,  shallow  submarines  may  make  ESM  and 
surface  search  (S/S)  radar  detections.  This  represents  the 
ability  of  the  submarine  to  extend  its  ESM  and  S/S  radar 
mast  above  the  water  in  the  same  manner  as  the  periscope. 

Except  for  ESM  against  radar  emissions,  a  shallow  submarine 
is  still  undetectable  by  means  other  than  sonar.  The  pro¬ 
gram  does  not  allow  for  visual  detection  by  periscope  due 
to  the  limited  maximum  range  at  which  such  a  detection  could  occur 
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Fighter,  strike  (attack) ,  interceptors  and  ECM  air¬ 


craft  may  only  make  visual  detections.  In  general  radars 
on  board  these  aircraft  are  fire  control  radars  without 
a  360  degree  search  capability.  Their  ESM  equipment  is 
primarily  short  range  threat  warning  oriented  and  is  used 
to  provide  a  warning  of  fire  control  or  missile  homing 
acquisition  or  lock  on.  Also  these  aircraft  are  never 
detectable  by  ESM  in  the  program  due  to  the  narrow  sector 
of  the  emitters. 

Arbitrary  limits  of  ten  knots  maximum  speed  and 
1000  feet  or  less  altitude  were  imposed  on  the  SH-3  and  KA- 
25  helicopters  before  they  may  attempt  a  dipping  sonar  detec¬ 
tion. 

Subroutine  DETECT  is  called  once  per  turn  from  the 
MAIN  program.  Subroutine  DETECT  calls  the  following  sub¬ 
routines  . 

1 .  SPOOK 

2.  ESM  (I) 

3 .  DETRAD  ( I ) 

4 .  ASONAR  ( I ) 

5.  NLPCPA  (I,  TIME) 

6.  VISUAL  (I,  ITYPE) 

7.  PSONAR  (I,  IPLAT) 

The  I  argument  passed  to  all  the  subroutines  called  except 
SPOOK  designates  the  row  subscript  of  the  unit  searching 
with  that  particular  sensor. 

The  second  argument  passed  to  NLPCPA  is  the  same 
length  of  the  current  turn  passed  to  DETECT.  The  second 
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argument  passed  to  VISUAL  and  PSONAR  indicates  what  kind 
of  unit  the  Ith  unit  is. 

Table  8  contains  the  local  variables  used  in  DETECT 
and  Figure  7  is  a  flowchart  for  DETECT. 


VARIABLE 


ITYPE 


IUNIT 


LIGHT 


Table  8 


Subroutine  DETECT,  Local  variables 


DESCRIPTION 

Counter  for  six  hour  surveillance  periods. 

Last  three  digits  (or  last  two  if  an 
aircraft)  of  the  Ith  units  type  number. 

Subscript  of  Ith  friendly  unit  in  do 
loop  90,  Ith  enemy  unit  in  do  loop  16. 

Total  number  of  friendly  units . 

Set  by  the  program  to  0  =  Dark,  1  =  Daylight 
as  a  function  of  game  time. 

Counter  for  the  number  of  HFDF  detections. 

Total  number  of  enemy  un^ts. 

Used  in  do  loop  11  to  calculate  six  hour 
periods  for  surveillance  periods. 


The  time  in  minutes  the  previous  turn 
ended. 


( — 


I 


Flowchart  of  Subroutine  DETECT 
Figure  7 
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If  the 
Ith  R.N.  is 
.  .L£.  .79  / 


Increment  N  by  1 

Set  values  in  the  Nth  row  of  HFDF 
to  those  of  the  Ith  unit 
Put  co-ordinates  of  detected  unit 
!  into  Xl-LOT  and  YPLOT 


1 6  CONTINUE 


Set  KINDER  (  10)  =n 
If  there  were  any  detections 
output  the  HFDF  array  on 
the  terminal 


Set  LIGHT=0 

Set  1IGHT-1  if  ZTIME^between 
0600  and  1 600  hours 
Set  IUNIT  to  the  number  o: 
friendly  units 


For  each  1=1,  IUNIT  friendly  units  DO  90 


'If  IDO.  ^ 
unit  not  in 

^  play  „ 


Set  ITYPE  to  the  last  ! 
three  digits  of  the  | 
type  number  I 


Is 

unit  a 
sub? 


_ T  ^ _ 

Calculate  CPA  of  all  target  units 
(Call  NLPCPA  (I)) 


If  sonar  is  passive  (off)  and 
speed  less  than  23  knots. 

Call  P  iONAP  (1,1)  to  determine 
any  pa  sive  sonar  detections 


If  sub  is  shallow  or 
surfaced,  Call  ESK(I) 
to  determine  SSli 
detections 


If  sub  is  shallow,  surfaced 
and  s/s  radar  is  on,  Call 
DETRAJD  (1)  to  determine 
radar  de'-octio  .. 


m 


i  If  sub  is  surfaced  and  it 
I  is  day,  Call  VISUAL  (I)  to 
I  determine  visual  detections 


If  sonar  is  on  and  speed  is 
. L£.  15  knots.  Call  ASONAR  (I) 
to  determine  active  sonar  detection 


GO  TO  90 


^ Is  unit 
a  surface 
,  ship? 


Call  CuPCPA  (I) 

Call  v3M(I) 

If  day.  Call  VISUAL  (I.ITYPS) 
If  'it her  A/S  or  S/S  radar  on 
Cal.  DLTRAL  (I) 

I sonar  off  and  speed  .LT.  1i 
Cal1,  ?( SONAR  (1, 2) 

If  conar  on  and  speed  .LT.  16 
Call  ASONAR  (I) 


GO  TO  90 


Set  ITYPE  to  last 
jtwo  dibits  of  ITYPt 


jCall  NLPCPA  (I)TIME) 
jlf  daylight,  Call 
VISUAL  (I,  ITYPE) 


If  unit  ^ 
is  fighter 
attack  or 
interceptor. 


Call  SSM  (I) 
Call  DETRAD  (I) 


Is  \ 
^  aircraft  a 
class  3  helo? 
V(3H3  or  KA-25) 


If  neic  speed  .LE.  30  KTS 
~nd  ALT.  .LE.  1000  ft 
^Call  PSONAR  (1,3) 


- _/<? 0  JOYTINUE 


•  IN  D 


5.  Subroutine  SPOOK 


i  This  subroutine  is  played  daily  at  0001,  0601,  1201, 

j  and  1801  hours.  In  game  terms  this  is  an  abstracted  repre- 

,  sentation  of  sources  of  military  intelligence  available 

i  beyond  the  level  of  command  represented  in  the  game.  The 

CASTAG  program  only  plays  level  I  of  the  three  surveillance 
,  levels  available  in  SEATAG. 

|  All  ships,  submarines  going  over  15  knots  and 

» 

radiating  aircraft  are  subject  to  detection.  A  U(0,1) 
random  number  is  drawn  for  each  unit  and  if  that  unit  is  in 

I  one  of  the  three  preceding  categories,  it  may  be  detected. 

t 

j  If  the  unit  is  in  EMCON,  i.e.,  emitting  no  radiation  including 

|  sonar,  the  chance  of  detection  is  reduced  twenty  percent. 

f 

If  a  unit  is  detected,  grid  location  and  general/ 
type  information  is  provided.  In  some  cases  additional 
information  consisting  of  the  units  course  to  the  nearest 
10  degrees  and  the  last  two  digits  of  the  unit's  type  number 
j  is  provided.  This  information  is  a  condensed  version  of 

j  Table  II-5  in  the  SEATAG  documentation. 

Subroutine  SPOOK  is  called  at  most  once  per  game 
l  turn  from  subroutine  DETECT  only  if  the  current  game  turn 

I  included  one  of  the  four  times  that  surveillance  is  played. 

Table  9  describes  the  local  variables  used  in  this 
j  subroutine.  Figure  8  is  a  flowchart  of  subroutine  SPOOK. 
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Table  9 


Variable 

I 

ID2 

J 

MCON 

N 

NUNIT 


Subroutine  SPOOK,  Local  Variables 


Description 


Row  subscript  of  the  unit  being 
checked . 


Set  to  first  two  digits  of  the  Ith  unit's 
type  number. 


Varying  column  sbuscript  of  array  DATA 
in  do  loop  9 . 


Sum  of  the  number  of  active  emitters 
on  a  unit.  MCON  =  0  means  unit  is  in 
EMCON. 


Counter  for  number  of  surveillance 
detections . 


Set  to  total  number  of  enemy  units. 
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I 

_ - _ )U _ _ _ 

Add  one  to  MCON  for  each  active  sensor 

or  communications  device  on  the  Ith  unit 
■  —  '•  - - - — - - ? - * - -  ■■ 

( 


Flowchart  of  cubroutine  SPOOK 


Figure  d 


A  surveillance  detection 
has  occurred.  Set  N-NH 


6.  Subroutine  ESM 


Subroutine  ESM  determines  all  possible  ESM  detec¬ 
tions  by  the  Ith  friendly  unit  of  radar  emissions  from 
each  enemy  unit. 

The  maximum  range  for  ESM  detections  is  calculated 
as  twice  the  maximum  range  of  the  emitter  times  the  percent 
of  maximum  range: 

Range  =  2  *  PRMAX  (I,N,3)  *  (Radar  Range) 

The  subscripts  for  PRMAX  are  I  denoting  the  Ith  detecting 
unit,  N  the  Nth  target  and  3  the  ESM  sensor.  This  is  com¬ 
pared  to  the  range  of  the  CPA  to  determine  if  a  detection 
occurs.  Detections  are  stored  in  array  ESMDET . 

This  subroutine  is  called  from  DETECT  when  the  ith 
unit  is  eligible  to  make  ESM  detections.  Subroutine  NLPCPA 
must  have  been  called  previously  from  DETECT  so  that  the 
range  and  bearing  of  the  CPA  of  every  enemy  unit  is  avail¬ 
able  in  array  CPA.  The  percent  of  maximum  range  for  the 
Ith  units  ESM  system  must  be  available  in  array  PRMAX. 

Table  10  contains  the  local  variables  used  in  this 
routine.  Figure  9  is  a  flowchart  of  subroutine  ESM. 


Table  10 


Variable 

I 

II,  JJ 

M 

N 

NTYPE 

NUNIT 

RANGE 


Local  Variables  of  Subroutine  ESM 


Description 

Argument  passed  from  DETECT  denoting 
the  Ith  friendly  unit  as  the  unit 
attempting  to  make  the  detections. 


Row  and  column  subscripts  for  printing 
out  array  ESMDET . 


Counter  for  number  of  ESM  detections 
for  the  Ith  unit. 


Row  subscript  of  DATA  denoting  the 
Nth  enemy  unit. 


Last  three  digits  of  the  Nth  unit 1 s 
type  number. 


Set  to  total  number  of  enemy  units . 


Range  at  which  detection  may  take 
place. 
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j’-jwchart  of  oubroutine  SSM(I) 


If  there  were  any  detections. . . 


- - 

i 

i 

i 

- L _ 

Output  player’s  version  of  ESMDET 
to  the  terminal 

Output  umpire’s  version  of  ESMDET 
to  the  offline  printer 


7 .  Subroutine  DETRAD 


Subroutine  DETRAD  checks  all  possible  radar  detec¬ 
tions  of  enemy  units  for  the  Ith  friendly  unit.  Air  search 
radars  are  only  allowed  to  detect  aircraft.  Surface  search 
radars  only  detect  ships  and  surfaced  submarines.  The 
detection  range  of  both  air  and  surface  search  radars  is 
calculated  as  the  maximum  range  times  the  percent  of  maxi¬ 
mum  range  from  array  PRMAX. 

A  detection  takes  place  when  the  detection  range 
of  the  radar  is  greater  than  the  CPA  of  the  target.  For 
submarines,  this  range  is  then  halved  making  them  more 
difficult  to  detect.  Detections  are  stored  sequentially 
in  the  first  ten  columns  of  integer  array  RADAR. 

The  only  argument  passed  to  DETRAD  is  I .  I  specifies 
the  row  of  the  friendly  unit  attempting  to  make  the  radar 
detections  and  is  used  as  the  row  subscript  to  access 
information  in  array  DATA. 

DETRAD  is  called  from  DETECT  whenever  a  unit  has 
either  an  air  or  surface  search  radar  on.  Subroutine  NLPCPA 
must  have  been  executed  last  for  unit  I.  Values  from  PRMAX 
with  the  third  subscript  1  for  surface  search  and  2  for  air 
search  radars  must  be  available. 

Table  11  lists  the  local  variables  of  DETRAD  and 
Figure  10  is  a  flowchart  of  the  routine. 
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Table  11 


DETRAD,  Local  Variables 


Variable 


ARANGE 


II,  JJ 


ITGT 


M 


N 


NUN  IT 


S RANGE 


Description 


A/S  Radar  calculated  final  detection 
range. 


External  argument  passed  from  DETECT. 
Designates  the  Ith  unit  which  is  doing 
the  detecting. 


Row  and  column  subscripts  for  printing 
out  first  10  columns  of  array  RADAR. 


Last  three  digits  of  the  Nth  unit's  type 
number. 


Column  subscript  in  do  loop  30  for  trans 
ferring  detection  data  to  array  RADAR. 


Counter  for  total  number  of  detections 
for  unit  I. 


Subscripts  the  row,  of  the  Nth  enemy 
unit . 


Set  to  total  number  of  enemy  units . 


S/S  radar  calculated  final  detection 
range. 
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I  Set  M-0 ,  NUNIT*  | 


yiJW’.  :.art  of  Subroutine  DETRAD 
Figure  10 


the  Nth  tar 
gat  on  the 
surface? 


Calculate  SRANGE® 
PRMAX  *  Radar  MAX 
range 


I 

If  target  is  a 

f 

1 

submarine,  Set 

\ 

SRANGE  =iSRANGE 

CPA  of  target 
less  than 
SRANGE?  . 


Increment  M  by  1 
Put  information  on 
Nth  unit  into  the 
Mth  row  of  RADAR  &  i 
into  XPLOT  and 
YPLOT 


If  there  were 
any  detections... 


Increment  MINDEX(IO) 
by  M 


i  Output  player’s  ver- I 

sion  of  RADAR  on  the 
terminal.  Output 
Umpire's  version  of 
!  RADAR  on  tne  offline 
!  printer. _ j 


8.  Subroutine  VISUAL 


Subroutine  VISUAL  processes  all  possible  visual 
detections  of  enemy  units  for  the  Ith  friendly  unit.  Ships 
and  surfaced  submarines  were  arbitrarily  assigned  an  unmodi¬ 
fied  visual  detection  range  of  10  n.m.  Aircraft  were  assigned 
a  20  n.m.  range.  Although  an  aircraft  or  ship  can  discern 
a  target  at  more  than  the  above  ranges,  visual  detection 
within  the  framework  of  SEATAG  implies  classification  oppor¬ 
tunities  as  well. 

Classification  implies  the  aircraft  or  ship  closes 
to  read  hull  numbers  and  count  masts.  Rather  than  try  to 
make  the  information  provided  a  function  of  range,  10  and 
20  miles  were  selected  as  reasonable  values  considering  the 
aggregate  level  of  the  game.  All  units  with  the  exception 
of  submerged  subs  are  detectable  by  this  routine. 

A  detection  occurs  when  the  calculated  CPA  of  the 
target  is  less  than  the  assigned  visual  detection  range. 

The  information  on  the  detection  is  stored  in  columns  11-20 
of  array  RADAR. 

The  two  arguments  passed  to  VISUAL  are  I  which 
designates  the  row  in  array  DATA  of  the  unit  attempting  to 
make  the  detection  and  ITYPE  which  tells  the  subroutine  if 
the  Ith  unit  is  an  aircraft  or  surface  unit. 

This  subroutine  is  called  from  DETECT  when  the  Ith 
unit  is  an  aircraft,  ship,  or  a  surfaced  submarine  and  game 
time  is  between  0600  and  1800  hours.  Subroutine  NLPCPA  must 
have  been  executed  last  for  unit  I. 


68 


Table  12  lists  the  local  variables  and  Figure  11 
is  a  flowchart  of  subroutine  VISUAL. 


1 

i 


Table  12 


Variable 

I 

II,  JJ 

ITYPE 

M 

N 

NTYPE 

NUNIT 

RANGE 


Subroutine  VISUAL,  Local  Variables 


Description 

Argument  passed  from  DETECT  denoting 
the  Ith  unit  doing  the  searching. 


Row  and  column  subscripts  for  printing 
out  columns  11-20  of  array  RADAR. 


Last  two  digits  of  Ith  unit  type  number 
if  aircraft,  last  three  digits  if  unit 
submarine  or  ship. 


Counter  for  number  of  visual  detections 
for  the  Ith  unit. 


Row  subscript  denoting  the  Nth  enemy 
unit. 


Last  three  digits  of  Nth  unit's  type 
number . 


Total  number  of  enemy  units. 


Set  to  10  n.m.  if  Ith  unit  on  surface, 
20  n.m.  if  Ith  unit  an  aircraft. 
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Flowchart  of  Subroutine  VISUAL 
Figure  11 


2.  ?*’422Ssfe" ' 
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9.  Subroutine  ASONAR 


ASONAR,  for  active  sonar,  determines  possible  active 
sonar  detections  by  the  Ith  friendly  unit.  The  unit's  sonar 
must  be  active  and  the  unit's  speed  less  than  15  knots 
prior  to  calling  ASONAR. 

Surface  ships,  submarines  and  helicopters  with 
dipping  sonars  may  make  active  detections.  Only  submerged 
submarines,  either  friendly  or  enemy,  may  be  detected  by  an 
active  sonar.  No  differentiation  is  made  between  a  friendly 
or  enemy  submarine  detection. 

Level  5  of  PRMAX  is  used  for  active  sonar  detections 
of  own  units  although  it  is  normally  used  in  determining 
passive  performance.  This  is  to  avoid  correlating  active 
sonar  performance  against  the  Nth  enemy  unit  with  that  against 
the  Nth  friendly  unit.  This  avoids  adding  another  level 
(K  =  6)  to  array  PRMAX  for  what  amounts  to  a  rare  occurrence. 

The  only  argument  passed  to  ASONAR  is  I.  This 
specifies  the  row  of  the  friendly  unit  attempting  to  make 
the  active  sonar  detections  and  is  used  as  the  row  sub¬ 
script  to  access  the  Ith  unit's  data  in  array  DATA. 

ASONAR  is  called  from  DETECT.  Values  for  percent  of 
maximum  range  from  array  PRMAX  with  the  third  subscript  equal 
to  four  and  five  are  required  before  the  subroutine  is 
called.  NLPCPA  must  have  been  called  last  for  the  Ith 
unit  prior  to  calling  ASONAR. 

Prior  to  the  second  time  through  do  loop  60,  NLPCPA 
is  called  from  ASONAR.  After  IFOE  is  set  to  ID,  NLPCPA 
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calculates  the  CPA  of  all  friendly  units  and  stores  the 
values  in  array  CPA.  This  is  the  only  instance  of  a  sub¬ 
routine  being  called  from  a  subroutine  other  than  from 
DETECT  in  program  SEARCH.  Note  that  ASONAR  must  be  the 
last  subroutine  called  for  detections  by  the  Ith  unit  in 
DETECT  due  to  its  calling  NLPCPA  as  the  values  in  array 
CPA  will  be  those  of  friendly  units. 

Detections  for  the  ith  unit  are  stored  in  the  first 
ten  columns  of  array  SONAR  by  row.  Table  13  lists  the  local 
variables  of  ASONAR.  Figure  12  is  a  flowchart  of  ASONAR. 
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Table  13 


Variable 


II,  JJ 


I  SAVE 


ITGT 


KUNIT 


NUNIT 


RANGE 


TIME 


Subroutine  ASONAR,  Local  Variables 


Description 


Argument  passed  from  DETECT  denoting  the 
Ith  unit  attempting  active  sonar  detections , 


Column  subscript  in  do  loop  40  to 
transfer  detection  data  to  array  SONAR. 


Row  and  column  subscripts  for  printing 
out  array  SONAR. 


Saves  value  of  IFOE  while  IFOE  =  ID. 


Last  three  digits  of  the  Nth  unit's 
type  number. 


Counts  twice  through  do  loop  60. 


Set  to  total  number  of  friendly  units, 


Counter  for  total  number  of  active 
sonar  for  the  Ith  unit. 


Row  subscript  denoting  the  Nth  enemy 
when  K  =  1  or  friendly  when  K  *  2  unit. 


Set  to  total  number  of  enemy  units 
when  K  =  1,  total  number  of  friendly 
units  when  K  =  2. 


Active  sonar  calculated  final  maximum 
detection  range. 


Argument  passed  to  NLPCPA  denoting  this 
turn's  length  in  minutes. 


*** 
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Flowchart  of  subroutine  ASONAH 


Figure  )<> 


I 

. ...i . . . 

Print  out  umpires  version  of 
SONAR  on  the  offline  printer 
Put  X,Y  co-ord  of  detections 
in  XPLOT  and  YPLOT 


- ¥ _ 

Increment  M INDEX  (1C)  by  M 
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10 .  Subroutine  NLPCPA 

NLPCPA  calculates  the  range  in  n.m.  and  the  bearing 
in  degrees  of  the  CPA  of  every  enemy  unit  to  the  Ith  friendly 
unit. 

The  final  CPA  is  in  fact  the  CPA  during  the  last 
turn.  In  most  instances  this  turns  out  to  be  the  initial 
or  final  position  of  the  Nth  unit,  depending  on  if  that  unit 
is  opening  or  closing  the  Ith  unit. 

The  subroutine  uses  each  unit's  (X,Y)  coordinates, 
course  and  speed  as  well  as  the  elapsed  time  and  clock  time 
of  this  turn.  Recall  that  since  subroutine  MOVE  is  called 
before  NLPCPA,  the  values  of  the  coordinates  are  where  the 
units  are  after  the  move. 

The  method  used  in  this  subroutine  to  determine  the 
CPA  takes  the  approach  commonly  used  underway  where  the 
relative  position  of  the  target  is  known  and  the  target's 
course,  speed  and  CPA  are  determined  from  that.  This  will 
appear  somewhat  round  about  as  the  target  course  and  speed 
are  already  available  and  a  normal  trigonometric  approach 
would  be  feasible. 

Point  (A,B)  is  the  position  of  the  Ith  unit  at 
time  ZTIME .  (X2,Y2)  is  the  relative  as  well  as  the  geo¬ 

graphic  position  of  the  Nth  unit  at  ZTIME.  Both  of  these 
points  are  available  in  array  DATA.  A  previous  relative 
position  of  the  Nth  unit  to  the  Ith  unit  must  be  calculated. 
This  point  (XI, Yl),  will  be  calculated  as  the  relative  posi¬ 
tion  of  the  target  at  time  (ZTIME-TIME) ,  or  the  game  time 
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at  the  beginning  of  this  turn.  (XI, Yl)  is  not  the  position 
of  the  target  at  the  beginning  of  this  turn.  It  is  a  relative 
position  at  which  the  target  may  never  have  been.  A  geometric 
diagram  of  the  calculation  of  (X1,Y1)  is  provided  as  Figure 
13. 

To  calculate  (XI, Yl)  the  X  and  Y  distance  traveled 
by  the  target  is  subtracted  from  point  (X2,Y2)  giving  the 
position  of  the  target  at  the  start  of  this  turn.  Then  the 
X  and  Y  distance  traveled  by  the  Ith  unit  is  added,  resulting 
in  XI  and  Yl: 


XI 

=  X2  -  Dl  * 

(SIN (THETA) ) 

+  XDIST 

(1) 

Yl 

=  Y2  -  Dl  * 

(SIN (THETA) ) 

+  YDIST 

(2) 

To  determine  the  CPA,  the  problem  is  to  find  the 
shortest  distance  from  point  (A,B)  to  the  line  defined  by 
the  two  relative  points  (XI, Yl)  and  (X2,Y2) .  This  line  is 
called  the  DRM  for  Direction  of  Relative  Movement.  The  slope 
is  called  DX.  Formulating  the  problem  as  a  non-linear  pro¬ 
gramming  problem  gives 


MIN  f (x,y )  = 

SQRT ( (X  -  A) 2  +  (Y  -  B) 2) 

(3) 

subject  to 

Y  -  Yl  =  DX  *  (X  -  XI) 

(4) 

Using  the  LaGrange  multiplier  technique,  we  mini¬ 
mize  the  square  function  minus  lambda  times  the  constraint 
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(Eq.  5)  which  will  have  the  same  minimum  as  Equation 
3. 


F(x,y)  =  (X-A)2  +  (Y-B)2  -  L  *  (Y  -  Yl 

-  DX  (X  -  XI)  )  (5) 

Taking  partial  derivatives  yields 


3F/3X  = 

2X 

-  2A  +  L  *  DX  =  0 

(6) 

3F/3Y  = 

2Y 

-  2B  -  L  =  0 

(7) 

3F/3L  = 

DX 

*  (X-Xl)  +Y1-Y  =  0 

(8) 

Equation  (7)  gives  an  expression  for  L  and  (8)  gives  an 
expression  for  Y  in  terms  of  X.  Substituting  these  in  (6) 
and  solving  for  X  yields 

X  =  (A  +  B  x  DX  +  XI  x  DX2  -  Yl  *  DX)/(1  +  DX2)  (9) 

Equation  (9)  is  how  X  is  calculated  in  NLPCPA.  Y 
is  computed  from  (8) .  (X,Y)  is  the  coordinate  of  the  CPA. 

In  the  calculation  of  DX,  if  the  absolute  value  of 
a 2  -  XI)  is  within  .001  of  zero,  the  CPA  calculation  is  not 
"•eeded  since  DX  is  infinite  or  nearly  so.  Practically 
•  in  this  case,  X2  =  XI  and  the  DRM  is  vertical, 

:  ;  a  CPA  of  (X2,B)  . 
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If  both  (X2  -  XI)  and  (Y2  -  YI)  are  less  than 
EPS,  then  X2  =  XI  and  Y2  =  Yl  implying  the  two  units 
involved  are  on  the  same  course  and  speed.  The  CPA  is 
set  to  (X2,Y2)  in  this  case. 

In  Figure  13,  the  CPA  falls  conveniently  between 
(XI, Yl)  and  (X2,Y2) .  In  fact  we  have  three  cases  to  con¬ 
sider  in  deciding  on  the  final  CPA.  Figure  14  shows  the 
three  possibilities.  The  relative  positions  of  (XI, Yl) 
and  (X2,Y2)  may  or  may  not  be  reversed,  giving  six  possi¬ 
bilities  to  check. 

Two  series  of  four  logical  FORTRAN  IF  statements 
branch  to  assign  the  appropriate  final  value  for  (X,Y) . 

Once  the  final  (X,Y)  is  determined,  the  distance 
from  (X, Y)  to  (A, B)  is  calculated  using  the  standard  car¬ 
tesian  distance  formula.  Distances  less  than  EPS  are 
set  to  EPS  to  avoid  dividing  by  zero  when  calculating  the 
bearing  of  the  CPA.  The  CPA  range  for  the  Nth  unit  is 
stored  in  CPA(N,1). 

Finally  the  bearing  of  the  point  (X,Y)  from  (A,B) 
must  be  calculated  and  converted  to  degrees.  TAU  is  the 
angle  between  line  segment  ( (A, B) , (X, Y) )  and  ( (X,B) , (X, Y) ) 
and  is  calculated  using  the  ARSIN  function  as 

TAU  =  ARCSIN ( (X  -  A) /CPA (N, 1) )  (10) 

In  the  first  quadrant  TAU  will  be  the  correct 
bearing.  If  (X,Y)  is  in  one  of  the  other  three  quadrants 
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of  (A, B)  TAU  must  be  modified  as  shown  in  Figure  15.  Finally 
TAU  is  converted  to  degrees  and  stored  in  CPA(N,2).  The 
argument  I  passed  to  NLPCPA  specifies  the  row  of  the  friendly 
unit.  The  CPA's  are  calculated  relative  to  this  unit.  TIME 
is  the  elapsed  time  for  this  turn. 

This  subroutine  is  called  from  DETECT  once  for  each 
Ith  (friendly)  unit  that  is  able  to  make  any  ESM,  radar 
or  sonar  detections.  In  addition,  NLPCPA  may  be  called 
from  ASONAR  in  circumstances  defined  in  that  subroutine. 

Figure  16  is  a  flowchart  for  NLPCPA  and  Table  14 
lists  the  local  variables. 


1 


QUADRANT  1 
X  GT  A 


Table  14 


Subroutine  NLPCPA,  Local  Variables 


Variable  Description 

A  Current  X  coordinate  of  the  Ith  unit. 

B  Current  Y  coordinate  of  the  Ith  unit. 


D1 

Calculated 

this  turn. 

D2 

Calculated 

this  turn . 

distance  the  Nth  unit  moved 

distance  the  Ith  unit  moved 


DX 

ETA 

I 

NUNIT 

RAD 

T 

TAU 

THETA 

TIME 

X 

X2 


Calculated  slope  of  the  DRM  line. 

Course  of  the  Ith  unit  in  radians. 

Argument  denoting  the  Ith  unit. 

Set  to  total  number  of  enemy  units . 

Set  to  it/180.  Used  as  degree  to  radian 
conversion  factor. 

Calculated  time  of  this  turn  in  hours. 

Angle  of  the  line  from  (A,B)  to  (X,Y) 
with  the  line  from  (X,Y)  to  (X,B) . 

Course  of  the  Nth  unit  in  radians. 

Argument  containing  the  elapsed  time  of 
this  turn  in  minutes. 

X  coordinate  of  the  calculated  and  final 
CPA. 

Current  X  coordinate  of  the  Nth  unit. 


XD 1ST  Distance  along  the  X-axis  the  Ith  unit 

moved  this  turn. 

Y  Y  coordinate  of  the  calculated  and  final 

CPA. 

Y1  Y  coordinate  of  the  relative  position  of 

the  Nth  unit  to  the  Ith  at  the  beginning 
of  this  turn. 
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Table  14  (Continued) 


Variable 

Y2 

YDIST 


Description 

Current  Y  coordinate  of  the  Nth  unit. 

Distance  along  the  Y-axis  the  Ith  unit 
moved  this  turn. 


T -Time/60 
RAD-Pi/l 60 
NUNIT-NROW  (IFOE) 
A -DATA  (I, 5, ID) 
B=DATA  (I, 6, ID) 


Calculate  for  the  Ith  unit, 
D2=TIME  (T)  *  speed 
ETA  =course  Pi/1 80 

XDIST -D2  x  SIN  (ETA) 

YDIST =D2  x  COS  (ETA) 


For  N-1 ,  NUNIT  DC  50 


FROM' 
50  / 


Calculate  for  the  Nth  unit 
THETA^ course  x  Pi/180 
D1-=T  x  sneed 
j  X2-=DATA  (N,  5,  IFOE) 

|  Y2=DATA  (N,  6,  IFOE) 


Calculate  (X1,Y1),  the  relative  (to  the  Ith  uni 
position  that  the  M:  h  unit  would  have  been  in  a 
;  ZTIME-TIME  as  follows: 

:  X1=(X  co-ord  of  Nth  unit  now)  >  (X  Distance  Ith 
!  unit  traveled  this  turn)-(X  Distance  Nth  unit 
traveled; ,  similarlv  for  Y1 
I  Y1=Y2  +■  YDIST  -  jl  x  COS  (THETA) 


Flowchart  of  Subroutine  NLPCPA 
figure  16 


ct  cl- 


Calculate  Distance  from  (X,Y) 
to  (A,B)  and  store  in  CPA(N,1) 


If  CPA  is  less  than  EPS, 
set  CPA  to  EPS. 


Calculate  TAU,  the  angle  made 
by  line  segments  ( (A ,B) , (X ,Y) ) 
and  ( (X , B) , (X , Y) )  as  ARSIN 
( (X-A)/(CPA(N, 1 ) ) ) ) 


If 

(X,  Y) 

in 

fourth  quadrant  of 

(A,B) 

set 

TAU= 

TAU 

*2Pi 

If 

(X,Y) 

in 

the  second 

quadrant 

of 

(A, 

B),  set  TAU=Pi-TAU 

If 

(X,Y) 

bears  ISO  from  (A.B), 

set 

TAU  - 

Pi 

If 

(X,Y) 

in 

the  third 

quadrant 

of 

(A, 

B) ,  set 

LAU-Pi-TAil 

Convert  TAU  to  degrees 
and  store  in  C?A(N,2) 


11 .  Subroutine  PSONAR 

Subroutine  PSONAR  determines  all  possible  passive 
sonar  detections  by  the  Ith  friendly  unit.  Ships  and 
submarines  at  any  depth  attempt  passive  detections  if 
their  sonar  is  off  (passive)  and  their  speed  is  less  than 
17  and  22  knots  respectively. 

There  are  two  kinds  of  passive  detections  possible 
in  this  subroutine.  First,  an  active  sonar  may  be  detected 
with  a  passive  sonar.  This  is  analogous  to  an  ESM  detection 
of  a  radar.  Range  is  calculated  as: 

Range  =  2  *  (Percent  effectiveness)  *  (Range  of  active  sonar) 

If  this  is  less  than  the  calculated  CPA,  a  detection  occurs. 
Sonar  ESM  detections  are  stored  in  the  last  10  columns 
of  SONAR,  n  approximate  range  is  provided  to  the  detecting 
unit  for  an  ESM  passive  detection.  This  is  calculated  as: 

Approximate  Range  =  CPA  Range + CPA  Range  *  (DICE  (N)  -  .5) 

DICE  (N)  is  a  U(0,1)  random  number.  The  approximate  range 
will  be  uniformly  distributed  between  one-half  and  1.5  the 
range  at  CPA. 

The  second  type  of  passive  detection  is  the  passive 
tracking  of  a  target  by  sonar.  The  target's  range,  bearing, 
course,  and  speed  are  determined  by  the  tracking  unit.  Any 
target,  with  the  exception  of  aircraft,  may  be  detected. 
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To  calculate  if  a  passive  detection  has  occurred, 
the  unit's  maximum  detection  range  is  calculated  as  a 
function  of  target  speed,  searcher  speed  and  where  the 
target  and  searcher  are  with  respect  to  the  layer. 

The  curves  in  the  top  half  of  Figure  17  are  used 
when  a  shallow  sub  is  attempting  to  detect  a  u  nit  on  the 
surface  or  two  submerged  subs  are  attempting  to  detect  one 
another  at  the  same  depth.  This  is  called  Case  1.  The 
curves  were  approximated  by  a  family  of  ellipses  whose 
parameters  are  functions  of  target  speed.  The  solid  curves 
are  those  given  in  the  SEATAG  manual  and  the  dashed  curves 
those  of  the  ellipse  approximations. 

The  ellipse  parameters  for  Case  1  are  calculated 
as  follows: 

A  =  (Target  Speed/5)  +  15 
B  =  Target  Speed  +  2 
X  =  Searching  unit  speed 

For  the  ellipse 


2  2 

Solving  for  Y  =  B  *  (1  -  (X  /A  )  gives  the  maximum 
passive  sonar  detection  range  in  n.m.  calculated  by  the  sub¬ 
routine.  The  maximum  range  error  is  plus  or  minus  3  n.m. 
from  the  original  curves. 


The  curves  in  the  bottom  half  of  Figure  17  repre¬ 
sent  a  cross  layer  detection  situation.  This  is  referred 
to  as  Case  2.  They  are  used  for  any  unit  on  the  surface 
trying  to  detect  any  submerged  submarine,  for  deep  subs 
trying  to  detect  surface  units,  and  for  two  submerged  sub¬ 
marines  at  different  depths  trying  to  detect  each  other. 

A  series  of  ellipses  was  also  used  to  approximate 
the  original  curves.  The  values  of  X  and  Y  remain  unchanged. 
The  A  and  B  parameters  for  Case  2  are  calculated  differ¬ 
ently  as  shown  below: 


A  =  Target  speed  +  C  *  (15  -  Target  speed) 


where 


C  =  .4  if  target  speed  <  16 

C  =  .6  if  target  speed  >  15  and  <_  24 

C  =  .7  if  target  speed  >  25 


and 


B  =  Target  speed  if  target  speed  <  21 


or 


B  =  (Target  speed/2)  +  10  if  target  speed  >_  21 


The  following  table  gives  the  A  and  B  parameters  as  a 
function  of  target  speed  for  5  knot  increments : 


t 
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Case  2 


TGT  SPD 

A 

B 

0 

6 

0 

5 

9 

5 

10 

12 

10 

15 

15 

15 

20 

17 

20 

25 

18 

22.5 

30 

19.5 

25 

In  Case  (2)  the  vertical  marks  where  the  curves  are 
truncated  at  a  maximum  of  an  18  knot  searcher  speed.  This 
in  effect  means  much  of  the  poorer  fitting  30  knot  curve 
is  not  used.  The  worst  distortion  is  for  a  17  knot  search 
speed  against  a  25  knot  target  which  results  in  a  7  n.m. 
range  vice  the  5  n.m.  range  obtained  using  the  curves 
manually. 

In  some  cases  it  is  possible  the  searcher's  speed 
will  be  greater  than  the  calculated  A  values.  In  this 
case  no  detection  should  be  possible  so  A  is  set  equal  to 
zero,  insuring  Y  will  be  zero.  If  the  calculated  Y  value 
is  greater  than  the  listed  sonar  max  range  on  the  charac¬ 
teristic  card,  Y  is  set  to  the  maximum  range  from  the  char¬ 
acteristic  card.  This  happens  most  frequently  with  sur¬ 
face  ship  short  range  sonars. 

Once  Y  is  determined,  it  is  multiplied  by  the  per¬ 
cent  of  maximum  range  (the  PRMAX  value)  to  give  the  final 
range.  This  is  then  compared  with  the  CPA  to  determine  if 
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a  detection  did  in  fact  take  place.  Detections  are  then 
stored  sequentially  by  row  in  the  first  ten  columns  of  array 
SONAR. 

The  argument  I  passed  to  PSONAR  specifies  the  row 
of  the  friendly  unit  attempting  to  make  the  passive  detec¬ 
tions  and  is  used  in  PSONAR  to  access  information  for  the 
Ith  unit  for  array  DATA.  The  argument  IPLAT  designates  the 
searching  unit  as  a  surface  ship  or  submarine. 

Subroutine  ASONAR  is  called  from  subroutine  DETECT. 
Subroutine  NLPCPA  must  have  been  previously  called  last 
for  unit  I.  Values  from  array  PRMAX  with  the  third  sub¬ 
script  K  =  5  are  used  for  the  percent  of  maximum  range. 

Table  15  provides  a  list  of  local  variables  and 
Figure  18  a  flowchart  for  subroutine  PSONAR. 


Table  15 


Subroutine  PSONAR,  Local  Variables 


Variable 

A 

B 

B2 

C 

I 

IA 


II,  JJ 

IK 


IPLAT 


M 


Description 

Parameter  of  ellipse  in  standard  form. 

Parameter  of  ellipse  in  standard  form. 

Used  to  calculate  B  as  a  function  of 
target  speed. 

Used  to  calculate  A  as  a  function  of 
target  speed. 

Argument  passed  from  DETECT  denoting  the 
Ith  unit  searching  passively. 

Column  subscript  in  do  loop  33  used  to 
transfer  data  on  the  Mth  detection  into 
array  SONAR. 

Row  and  column  subscripts  for  printing 
out  columns  of  array  SONAR. 

Column  subscript  used  in  do  loop  55  to 
transfer  the  MMth  passive  detection  data 
into  array  SONAR. 

Argument  passed  from  DETECT  denoting  the 
type  of  searching  platform,  1  for  a 
submarine,  2  for  a  surface  unit. 

Counter  for  the  number  of  passive  sonar 
ESM  detections . 


Ml 

MM 


Lower  bound  on  the  row  subscript  of  array 
SONAR  when  printing  out  passive  detections 

Counter  for  the  number  of  passive  sonar 
detections.  Starts  from  M. 


N 

NTGT 

NUNIT 


Row  subscript  denoting  the  Nth  enemy 
unit  used  in  do  loop  35  and  60. 

Last  three  digits  of  the  Nth  unit's 
type  number. 

Set  to  total  number  of  enemy  units. 


RANGE 


Calculated  final  detection  range  in  n.m. 
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Table  15  (Continued) 


Description 

Searchers  speed  (Ith  units  speed  in 
knots)  . 

Calculated  detection  range  before 
modification  by  PRMAX. 


G.  DESCRIPTION  OF  FORTRAN  PROGRAM  CHANGE 

CHANGE  allows  the  player  to  change  a  unit's  course, 
altitude  or  depth  and  turn  radars,  sonar,  and  HF  communi¬ 
cations  on  or  off.  Units  may  be  brought  in  and  out  of 
play  by  changing  their  ID.  Units  brought  into  play  may 
have  their  X  and  Y  coordinates  changed  to  insure  they  enter 
play  at  an  appropriate  location.  Units  out  of  play  are 
set  to  (0,0).  CHANGE  is  executed  once  per  game  turn  by 
CASTAG  EXEC. 

Integer  inputs  that  are  incorrect  for  a  particular 

I 

parameter  of  a  unit  are  corrected  as  follows: 

1.  Speeds  greater  than  listed  maximum  speed  are  set 
to  unit's  max  speed. 

2.  An  altitude  other  than  0  for  a  surface  unit  will 
be  set  to  0. 

3.  Any  course  greater  than  360  will  be  set  to  360. 

A  unit  which  has  had  a  non-existent  sensor  activated 

will  not  affect  the  detection  routines.  The  maximum  range 
for  that  sensor  will  be  zero  in  the  data  base  resulting  in 
a  consistent  zero  detection  range. 

ID  numbers  and  X  or  Y  coordinates  are  not  screened  in 
any  way  and  must  be  corrected  by  cycling  that  particular 
unit  back  through  the  change  procedure.  Figure  19  is  a 
flowchart  of  CHANGE  and  Table  16  is  a  list  of  the  variables 


used  in  CHANGE. 


Table  16 


List  of  Variables  and  Arrays  for  Program  CHANGE 


Variable/ Arra^ 


Description 


DATA  (50,  20) 


Integer  array  holding  either  Red  or 
Blue  data  in  the  same  format  as  in 
the  data  base. 


NCOL 


NREAD 


Number  of  columns  being  used  for  data 
in  array  DATA.  Set  to  15. 

Used  to  designate  the  terminal  as  the 
read  device  for  FORTRAN  READ  state¬ 
ments.  Set  to  5. 


NWRITE 


Used  to  designate  the  terminal  as  the 
write  device  for  FORTRAN  WRITE 
statements.  Set  to  6. 


NROW 


Maximum  number  of  units  (rows)  array 
DATA  will  hold.  Set  to  50. 


2TIME 


Game  clock  time  in  minutes.  Printed 
out  for  reference. 


IDENT  Input  by  user.  1  designates  Red; 

2  designates  Blue. 

IDISK  DSRN  designating  which  file  to  access 

for  information.  Set  to  IDENT +  2, 
giving  3  for  Red,  4  for  Blue. 

N  Input  by  user  telling  the  program  what 

column  of  array  DATA  will  be  changed. 

I TYPE  Last  three  digits  of  Nth  units  type 

number. 


IDNO  Row  subscript  of  DATA  designating  that 

unit  will  have  its  ID  number  changed. 

I  Used  throughout  the  program  as  a 

variable  row  subscript  for  array  DATA. 

J  Used  throughout  the  program  as  a 

variable  column  subscript  for  array 
DATA. 


106 


Figure  19 

Flowchart  of  FORTRAN  Program  CHANGE 
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H.  DESCRIPTION  OF  FORTRAN  PROGRAM  UPDATE 

UPDATE  combines  two  files  into  the  new  data  base  prior 
to  the  next  execution  of  SEARCH.  UPDATE  is  executed  once 
at  the  end  of  the  game  turn  by  CASTAG  EXEC.  UPDATE  READS 
the  two  files  which  contain  the  user  entered  changes  to 
the  data  base  (FT03F001  and  FT04F001)  into  two  arrays. 

File  FT02F001  is  prepared  to  be  written  on  from  the  top  by 
a  REWIND  command  which  destroys  the  existing  information. 
File  FT02F001  was  the  data  base  which  had  been  saved  up  to 
this  point  to  provide  a  backup  if  either  of  the  two  new 
files  were  inadvertantly  destroyed  during  execution  of 
CHANGE. 

Arrays  RDATA  and  BDATA  are  written  back  on  FT02F001  in 
the  same  format  as  the  old  data  base.  FT02F001  and  FT04F001 
are  rewound.  Note  that  should  the  users  have  entered 
different  turn  lengths  during  execution  of  SEARCH  at  the 
terminals,  ZTIME  will  be  fixed  for  next  turn  at  both  ter¬ 
minals  at  whatever  was  entered  by  the  Blue  player. 

Table  17  lists  the  variables  and  arrays  in  UPDATE  and 
Figure  20  is  a  flowchart  of  UPDATE. 
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Table  17 


List  of  Variables  and  Arrays  for  Program  UPDATE 


NCOL 


Number  of  columns  being  used  in  the 
data  structure.  Set  to  15. 


NROW 

NRED,  NBLUE 

ZTIME 

NDISK 

RDISK,  BDISK 


Maximum  number  of  units  (rows)  per 
side.  Set  to  50. 

Total  number  of  RED  and  BLUE  units, 
respectively . 

Total  game  time  in  minutes. 

DSRN  for  the  data  base.  Set  to  2 
designating  file  FT02F001  for  READ 
and  WRITE  statements . 

Integers  designating  FT03  and  FT04  as 
READ  files. 


RDATA  (50,  20)  RED  half  of  the  original  data  base 

which  has  had  the  changes  made. 


BDATA  (50,  20) 

I 


BLUE  half  of  the  original  data  base 
which  has  had  the  changes  made. 

Row  subscript  for  RDATA  and  BDATA. 


J 


Column  subscript  for  RDATA  and  BDATA. 


START 

V 

Declare  RDATA,  BDATA  intergers 
Dimension  arrays  and  set  initial  values 


Read  ZTIME  and  NRED  from  FILE  FT03F001 

r—r~  ~  - 

Zero  out  arrays  j 

1 _ , 

Read  FILE  FT03F0Q1  into  array  RDATA 

_ X _ 

Read  ZTIKE  and  NBLUE  from  FILE  FT04FQ01 

_ it  _ _ 

Read  the  rest  of  FILE  FT04F001  into  array  BDATA 


REWIND  FILE  FT02F001 f  destroying  the  informatior 
in  the  data  base 


Write  ZTIME,  NRED,  NBLUE  on  the  first  record 
of  FILE  FT02F001 


Write  RDATA  On  FILE  FT02F001 

'  >1-  - -  '  - 

Write  BDATA  On  FILE  FT02F001 

I  "  ~ 

REWIND  FILES  FT03F001  and  FT04F001 


(RETURN) 

Flowchart  of  FORTRAN  Program  UPDATE 
Figure  20 


USER'S  GUIDE  TO  CASTAG 


This  chapter  discusses  terminal  inputs,  program  outputs, 
and  program  recovery  procedures.  Some  familiarity  with 
SEATAG  is  assumed  as  well  as  some  knowledge  of  FORTRAN  for¬ 
mat  "I"  and  "F"  input  type  declarations.  The  line  and 
letter  delete  instructions  refer  specifically  to  the 
DECWRITER  T-300  terminals  in  the  NPS  Computer  Center.  Other 
terminals  should  have  analogous  functions. 

A.  CASTAG  TERMINAL  INPUTS 

The  terminals  have  two  keys  which  can  be  used  to  correct 
input  errors  before  returning  the  carriage.  The  symbol 
is  used  to  delte  the  previous  character  in  an  input  line. 

More  than  one  can  be  used  per  line.  For  example,  enter¬ 
ing  a  format  112  parameter,  "1A"  is  typed.  To  correct  the 
illegal  character  "A",  type  "@2"  resulting  in  "1A@2"  which 
will  be  read  as  "12"  following  the  carriage  return.  The 
"]"  symbol  typed  at  the  end  of  a  line  will  cause  the  terminal 
to  delete  the  line  following  the  carriage  return  allowing 
the  user  to  re-enter  the  line. 

To  begin  execution  of  CASTAG,  enter: 

$  CASTAG 

the  terminal  will  print: 

THIS  IS  THE  SEATAG  EXEC  ROUTINE. 

THIS  PROGRAM  WILL  REQUIRE  A  DATA  BASE 
WHICH  HOLDS  ALL  THE  APPROPRIATE  SHIP  AND 
AIRCRAFT  CHARACTERISTICS. 

112 


ENTER  THE  USER  NUMBER  OF  THE  OTHER  PLAY  INCLUD¬ 
ING  P  OR  G  FOR  USER  TYPE,  MAKING  A  TOTAL  OF  5 
DIGITS,  EG;  "1059P". 

> 

The  ">"  symbol  means  the  terminal  is  waiting  for  an 
input  to  CASTAG  EXEC.  An  illegal  input  will  cycle  an  EXEC 
program  back  to  the  input  instruction.  In  this  example, 
the  user  entered  "1059P".  The  terminal  replies  with: 

IS  OTHER  PLAYERS  ID  =  1059P  ?  ENTER  Y  OR  N. 

>  Y 

Answering  with  "N"  would  give  the  user  a  chance  to  re¬ 
enter  the  user  ID.  Following  a  "Y"  entry,  the  terminal 
prints: 

FILE  FT02F001  IS  THE  DATA  BASE.  THIS  FILE  MUST  BE 
SENT  TO  THE  CONSOLE  OF  THE  OTHER  PLAYER  IF  NO  COPY 
EXISTS  IN  HIS  FILES.  IF  YOU  ARE  THE  OTHER  PLAYER, 
YOU  WILL  HAVE  TO  READ  FILE  FT02F001. 

IF  NO  TRANSFER  OF  DATA  BASE  REQUIRED  ENTER  N. 

TO  TRANSFER  DATA  BASE  TO  OTHER  PLAYER  ENTER  "T". 

TO  READ  THE  DATA  BASE  FROM  THE  OTHER  PLAYER  ENTER  "R 
>R 

The  example  shows  the  user  wants  to  read  the  data  base 

from  the  other  terminal . 

FILES:-  NO  R DR,  NO  PRT,  NO  PUN 

IF  YOU  HAVE  A  FILE  SPOOLED  WAITING  TO  BE  READ, 

ENTER  "Y".  IF  NOT  ENTER  ANY  OTHER  LETTER  EXCEPT  N. 
THE  PROGRAM  WILL  CONTINUE  TO  RETURN  HERE  UNTIL  THE 
FILE  IS  AVAILABLE  OR  UNTIL  Y  OR  N  IS  ENTERED.  TO 
GO  AHEAD  WITHOUT  READING  THE  FILE  ENTER  N. 

The  message  shows  no  files  waiting  to  be  read.  Conse¬ 
quently,  an  entry  of  any  letter  except  "Y"  or  "N"  should  be 
made.  Either  or  both  of  the  messages  will  indicate  that 
there  is  a  spooled  file  waiting.  These  are: 

**  CARDS  XFERED  BY  1059P05  ** 


or 


FILES:-  01  RDR,  NO  PRT,  NO  PUN 

Assuming  the  user  had  entered  "N" ,  and  then  received 

one  of  the  two  messages  above,  the  terminal  repeats: 

IF  YOU  HAVE  A  FILE  SPOOLED  WAITING  TO  BE  READ, 

ENTER  "Y".  IF  NOT  ENTER  ANY  OTHER  LETTER  EXCEPT  N. 
THE  PROGRAM  WILL  CONTINUE  TO  RETURN  HERE  UNTIL  THE 
FILE  IS  AVAILABLE  OR  UNTIL  Y  OR  N  IS  ENTERED.  TO 
GO  AHEAD  WITHOUT  READING  THE  FILE  ENTER  N. 

>y 

Entry  of  "Y"  will  output  a  verification  of  the  file  read: 
OFFLINE  READ  FILE  FT02F001  PI 

An  entry  of  "T"  will  print  one  message: 

**  CARDS  XFERED  TO  0000G  ** 
and  skip  the  preceding  sequence. 

Entry  of  "N"  at  any  point  skips  the  file  transfer  sec¬ 
tion  and  proceeds  with  program  execution,  even  if  there  is 
no  data  base  at  one  or  both  terminals. 

The  next  line,  "EXECUTION  BEGINS.  .  . "  indicates  the 
start  of  a  FORTRAN  program.  In  this  case  it  is  program 
SEARCH.  All  inputs  to  FORTRAN  programs  will  have  format 
instructions  for  the  required  entry.  All  are  integer  entries 
with  the  exception  of  one  F4 . 0  entry.  Integer  formats  are 
specified  by  "FORMAT  14"  or  "112"  or  "111"  or  some  combina¬ 
tion  thereof.  Any  illegal  entries  will  cause  either  program 
termination  or  a  "fix-up"  which  will  probably  cause  the 
input  to  be  read  as  zeros. 

SEARCH  requires  three  entries.  The  first  is  the  random 
number  seed,  of  up  to  seven  integers.  A  zero  may  be  entered 
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A 


in  which  case  the  program  sets  the  random  number  seeds. 
Different  random  number  seeds  should  be  entered  at  the  two 
terminals .  The  next  entry  is  the  duration  of  the  next 
turn  in  minutes.  Both  terminals  should  enter  the  same 
value.  The  maximum  value  is  1440  minutes  or  24  hours  and 
the  minimum  is  zero .  Only  the  time  specified  by  the  Control 
Group  should  be  entered.  Last,  a  single  digit  entry,  "1" 
or  "2",  tells  the  program  whether  it  is  Red  or  Blue.  Follow 
ing  these  entries,  a  printout  of  detection  information  for 
each  side  is  printed  out  at  the  terminal.  Interpretation 
of  this  output  is  covered  in  Section  B  of  this  chapter. 

Below  is  an  example  of  the  inputs  to  SEARCH: 

EXECUTION  BEGINS. . . 

ENTER  THE  RANDOM  NUMBER  SEED,  FORMAT  17. 

>1219503 

ENTER  THE  TIME,  IN  MINUTES,  OF  THIS  TURN,  F4 . 0 . 

>60 

ENTER  "1"  IF  YOU  ARE  THE  RED  PLAYER,  "2"  IF  BLUE. 

FORMAT  111. 

>2 

The  entries  show  a  seed  of  "1219503",  a  sixty  minutes  turn 
length  and  that  this  terminal  is  Blue  this  turn. 

Conclusion  of  program  SEARCH  and  the  start  of  the  next 
FORTRAN  program  is  indicated  by 

"EXECUTION  BEINGS... 

ENTER  1  FOR  RED,  2  FOR  BLUE,  FORMAT  111". 

The  next  FORTRAN  program,  CHANGE,  has  begun  execution.  This 
is  an  interactive  sequence  that  allows  the  user  to  change 
parameters  and  bring  units  in  and  out  of  play.  The  initial 
access  is  by  row,  so  the  first  unit  in  the  data  base  is 


unit  "1".  There  can  be  up  to  50  units  so  these  entries 
are  made  in  12  format.  A  code  number  (2  through  8)  is 
input  to  determine  which  value  is  to  be  changed  followed 
by  the  new  value  when  requested.  All  changes  to  a  unit 
should  be  made  first  before  moving  on  to  another  unit  although 
it  is  possible  to  cycle  through  the  changes  as  many  times 
as  required.  Appendix  B  provides  an  example  of  an  actual 
CHANGE  execution. 

Following  entry  of  the  last  change  to  the  last  unit, 
program  control  is  returned  to  CASTAG  EXEC.  The  next 
sequence  transfers  the  files  altered  by  CHANGE. 

NOW  EACH  PLAYER  SENDS  HIS  UPDATED  FILE  TO  THE  OTHER 
PLAYER.  TO  INITIATE  TRANSFER, 

ENTER  "R"  IF  YOU  ARE  RED,  ”BM  IF  BLUE. 

>b 

YOU  ENTERED  B  .  IS  THIS  CORRECT?  ENTER  "Y"  OR  "N" . 

>w 

The  above  sequence  tells  the  CASTAG  program  if  it  is  Red 
or  Blue. 

Two  messages  will  indicate  a  file  waiting  to  be  read 
as  in  the  data  base  transfer. 

**  CARDS  XFERED  BY  1059P05  ** 

**  CARDS  XFERED  TO  1059P  ** 

FILES:-  01  RDR,  NO  PRT,  NO  PUN 

DO  YOU  HAVE  A  FILE  SPOOLED  TO  BE  READ?  ENTER  "Y"  OR  "N 

>y 

OFFLINE  READ  FILE  FT03F001  PI 

The  XFERED  BY"  message  mau  appear  while  still  executing  CHANGE 
This  means  the  other  terminal  user  has  finished  his  changes 
and  initiated  transfer.  The  other  player  still  must  wait 
to  read  your  change  file  before  continuing.  The  rest  of  the 


sequence  is  carried  out  as  if  "R"  was  entered  in  the 
transfer  at  the  beginning  of  the  program. 


After  both  transfers  have  been  completed,  a  list  of 
files  is  output  for  comparison  to  four  filetypes.  Each 
terminal  should  have  all  four  before  proceeding  to  the 
next  turn. 


FILENAME 

FILETYPE 

MODE 

NO.REC. 

DATE 

FILE 

FT01F001 

PI 

10 

2/19 

FILE 

FT02F00 1 

PI 

2 

2/19 

FILE 

FT04F001 

PI 

1 

2/19 

FILE 

FT03F001 

PI 

1 

2/19 

YOU  SHOULD  HAVE  FILE  TYPES  FT02F001,  FT03F001,  FT04F001 
AND  FT01F001  ON  YOUR  DISK  AT  THIS  TIME. 

CASTAG  executes  UPDATE  and  prints: 

TO  PLAY  ANOTHER  TURN,  ENTER  Y.  TO  QUITE  ENTER  N. 

This  entry  lets  the  user  go  back  to  SEARCH  to  play  another 

turn  or  to  terminate  the  program. 


B.  DECODINQ/ENCODING  TYPE  NUMBERS 

Each  unit  in  CASTAG  is  given  a  four  digit  code  for 
identification  as  to  the  unit's  side,  platform,  kind  and 
class.  These  numbers  are  called  type  numbers  and  are 
assigned  when  the  data  base  is  created.  They  are  decoded 
by  the  participants  to  determine  information  about  specific 
detections.  Table  18  provides  definitions  for  the  first 
three  digits.  Table  19  gives  the  fourth  digit  assignment 
for  all  the  units  currently  available  in  CASTAG. 


Table  18 


First 

Three  Digits 

of  Type 

Number  Assignment 

DIGIT 

NAME 

VALUES 

DEFINITION 

First 

Side 

0 

Neutral 

1 

Red 

2 

Blue 

Second 

Platform 

1 

Submarine 

2 

Aircraft/helicopter 

3 

Surface  vessel 

Third 

Kind 

0 

Merchant  or  civilian 

1  Submarine 

2  Aircraft  carrier 

3  Large  surface 
combatant  (CG,CLG,DDG) 

4  Small  surface 
combatant  (FF,FFG,  PG) 

5  Service  force/ 
amphibious  force 
(AOE) 

6  Fighter,  Interceptor, 
Attack  Aircraft 

7  ASW  fixed  wing  air¬ 
craft  (S-3,P-3) 

8  Bomber,  Recon  or 
AEW  aircraft 

Helicopter 
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Table  19 


Type  Numbers ,  Fourth  Digit 


BLUE  UNITS 

NUMBER 

CLASS 

Submarines 

1 

Los  Angeles 

2 

Sturgeon 

Aircraft  carrier 

1 

USS  America 

CG,  CLG,  DDG,  DD 

(Largest  surface  combatants) 

1 

Leahy 

2 

C .  F .  Adams 

3 

Coontz 

4 

Barry 

5 

Spruance 

FF,  FFG,  PG,  PGM 
(Small  surface  combatants) 

1 

Perry 

2 

Brooke 

3 

Knox 

4 

Garcia 

Service  force/Amphibious 

1 

Sacramento 

Fighter/Attack  aircraft 

1 

KA-6D  Tanker 

2 

EA-6B  ECM  support 

3 

A- 6  Corsair 

4 

A- 7  Intruder 

5 

Phantom  II 

ASW  fixed  wing  aircraft 

1 

S-3A 

2 

P-3C 

Bomber,  Recon,  AEW  aircraft 

1 

E-2C 

Helicopters 

1 

SH-3H 

2 

SH-2D 

Table  19  (Continued) 


RED  UNITS 

NUMBER 

CLASS 

Submarines 

1 

Charlie  SSGN 

2 

Victor  SSN 

3 

Echo  II  SSGN 

4 

November  SSN 

5 

Juliett  SSG 

6 

Foxtrot  SS 

Aircraft  carriers 

1 

Kiev 

2 

Moskva 

CG,  CLG,  DDG,  DD 

1 

Kara 

2 

Kresta  I 

Kynda 

3 

Kresta  II 

4 

Krivak 

FF,  FFG,  PG,  PGM 

1 

Nanuchka 

Service/Amphibious  force 

1 

Chilikin  (AOE) 

Fighter/Attack  aircraft 

1 

MIG  23 

2 

YAK  36  Forger 

ASW  fixed  wing 

None 

Bomber/Recon  aircraft 

1 

Bear 

2 

Badger 
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C.  CASTAG  TERMINAL  OUTPUT 


Following  execution  of  SEARCH,  the  detection  information 
for  that  side  is  output  on  the  terminal.  If  there  were  no 
detections  by  a  particular  unit  or  no  detections  of  a  cer¬ 
tain  type  there  is  no  output.  It  is  possible  for  there  to 
be  no  detections,  and  hence  no  output,  at  all.  All  detec¬ 
tions,  with  the  exception  of  active  sonar,  are  of  opposing 
units . 

The  first  output  is  surveillance  information  available 


on’y  at  0001, 

0601,  1201 

and  1801  game 

time.  The 

information 

is  presented 

as  follows: 

UNIT  TYPE 

X-COORD 

Y-COORD 

PLATFORM 

COURSE 

21 

535 

476 

0 

0 

23 

504 

491 

47 

95 

Unit  type  is  the  first  two  digits  for  the  type  number.  In 
the  example  above,  "21"  is  a  Blue  submarine  and  "23"  is  a 
Blue  surface  unit.  The  (X,Y)  position  is  the  current  one. 

The  platofrm  is  the  last  two  digits  of  the  type  number. 

"0"  indicates  the  information  is  not  available.  The  course, 
if  provided,  is  rounded  to  within  10  degrees  of  the  true 
course . 

Any  HF  detections  are  output  next  in  the  following  format 

HF  DETECTIONS  OF  ENEMY  COMMS 
X  COORD  Y  COORD 

510  510 

This  example  informs  the  user  there  was  an  enemy  HF 
transmission  originating  from  (510,  510)  during  this  turn. 
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Each  unit,  in  row  order,  will  now  have  all  of  its 
detections  printed.  The  output  order  varies  with  the  plat¬ 
form  as  shown  below: 

ORDER  SUBMARINE  SURFACE  AIRCRAFT 

1  Passive  Sonar  ESM  Visual 

2  ESM  Visual  ESM 

3  Radar  Radar  Radar 

4  Visual  Passive  Sonar  Active  Sonar 

5  Active  Sonar  Active  Sonar  N/A 

Passive  sonar  detections  have  the  following  format: 

DETECTIONS  OF  ACTIVE  SONARS  BY  UNIT  111 
DEPTH  BEARING  APPROX  RANGE 

0  89  10 

PASSIVE  DETECTIONS  BY  UNIT1011 

COURSE  SPEED  DEPTH  RANGE  BEARING 
160  30  0  12  89 

100  7  1  2  199 

Course,  speed,  and  depth  are  as  per  the  information  in  the 
data  base.  The  bearing  is  in  both  cases  the  bearing  at  CPA, 
not  necessarily  the  most  current  bearing.  The  passive  detec¬ 
tion  range  is  the  range  at  CPA.  The  approximate  range  for 
ESM  detections  of  active  sonars  is  u  uniformly  distributed 
random  variable  with  the  mean  at  the  range  at  CPA.  These 
detections  are  by  unit  ID  number  111. 

All  ESM  detections  appear  in  the  following  format: 

ESM  INTERCEPTS  BY  UNIT  333 

RADAR  BEARING  PLATFORM 

13  91  33 

12  26  29 

RADAR  TYPE  12  =  SURFACE  SEARCH  TYPE  13  =  AIR  SEARCH 


In  the  above  example  unit  333  has  detected  an  air  search 
radar  (type  13)  and  a  surface  search  radar.  Both  bearings 
are  the  radar  bearings  at  CPA.  The  platform  number  is  the 
middle  two  digits  of  the  type  number.  "33"  represents  a 
Red  CG/CLG  and  "29"  is  a  Red  helo. 

Air  and  surface  search  radar  detections  appear  jointly 
by  unit.  In  the  following  example,  unit  666  has  detected 
two  targets.  The  "12"  designates  the  S/S  radar  and  "13" 
the  A/S  radar.  Notice  that  although  the  air  target  has  a 
speed  of  10  knots  it  must  still  be  an  air  target  of  some  type. 
It  could  be  a  helicopter  of  an  aircraft  presumed  to  be 
orbiting.  "COMP"  is  the  number  of  targets  in  the  unit  or 
its  composition.  All  detections  are  single  targets  so  this 
information  is  superfluous. 

RADAR  DETECTIONS  BY  UNIT  666 

RADAR  TYPE  COURSE  X  COORD  Y  COORD  SPEED  COMP. 

12  160  547  448  10  1 

13  225  510  510  10  1 


Active  sonar  detections  may  be  either  friendly  or  enemy 
submarines.  An  example  of  a  detection  printout  is  provided 
below. 


active  sonar  detections  BY  UNIT  50 

DEPTH  COURSE  X  COORD  Y  COORD  SPEED 

1  95  535  473  10 

1  100  534  472  7 

Unit  50  has  detected  two  submarines  in  close  proximity. 


A  depth  of  "1"  indicates  they  are  both  shallow  while  a  ”2" 
would  indicate  deep.  (X,Y)  position,  course  and  speed  are 
as  previously  explained. 
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Visual  identifications,  although  only  occurring  at  short 
range,  provide  reasonably  complete  target  identification. 

In  the  example  provided,  unit  333  has  two  detections. 
Complete  type  information  identifies  "1332"  as  a  Red  CG 
of  the  KARA  class.  "1293"  is  a  KA-25  Hormone  helicopter. 

The  altitude  in  the  helicopter's  case  is  1000  feet.  Bear¬ 
ing  is  still  the  bearing  at  CPA.  The  rest  of  the  informa¬ 
tion  is  self  explanatory. 

VISUAL  DETECTIONS  BY  UNIT  333 

TYPE  ALT  COURSE  X  COORD  Y  COORD  BEARING  COMP 
1332  0  245  419  479  355  1 

1293  1  255  497  476  244  1 

An  example  of  the  terminal  output  for  every  kind  of 

detection  has  been  provided.  This  information  is  in  fact 

what  the  players  will  be  basing  their  tactical  decisions 

on.  Section  D  provides  a  similar  discussion  of  the  offline 

printer  output. 

D.  CASTAG  OFFLINE  PRINTER  OUTPUT 

Each  terminal  prints  five  sections  in  order.  Each  sec¬ 
tion  is  usually  no  more  than  a  page  in  legnth.  The  contents 
and  use  of  each  section  is  discussed  in  order  of  appearance. 

A  representative  form  the  Control  Group  should  collect 
the  printouts  and  distribute  sections  two  and  three  to 
their  respective  sides.  Both  copies  of  Sections  one,  four, 
and  five  should  go  to  the  Control  Group. 


1.  Umpire  Summary  of  Detections 

This  output  matches  that  of  each  terminal  with  the 
same  detections  in  the  same  order  as  the  originating 
terminal.  The  Control  Group  will  need  one  from  each  ter¬ 
minal  to  get  a  complete  picture  of  the  preceding  turn. 

All  the  information  on  the  terminal  printout  is  present 
with  the  addition  of  the  ID  number  of  the  unit  detected, 
the  range  and  bearing  of  CPA  and  other  pertinent  information. 
The  CPA  range  is  especially  important  for  playing  engage¬ 
ments  as  this  will  be  the  range  for  all  firing  calculations. 
An  example  of  the  information  provided  in  this  printout  is 
reproduced  below. 

UMPIRE  COPY,  PASSIVE  SONAR  DETECTIONS,  UNIT  51 
ID  SPD  DEPTH  CSE  X  Y  TYPE  RGE  BRG 
555  17  0  90  548  491  2347  5  60 

UMPIRE  VERSION  OF  VISUAL  SIGHTINGS,  UNIT  71 

TYPE  ALT.  COURSE  X  COORD  Y  COORD  BRG  COMP  CPA  RNG  ID 
2333  0  90  513  480  67  1  11  333 

ESMDET,  UMPIRE  VERSION  ID  =  71 


RADAR 

BEARING 

PLATFORM  ID  NO. 

CPA  RANGE 

12 

88 

32 

444 

25 

13 

88 

32 

444 

25 

13 

70 

34 

555 

45 

13 

101 

34 

666 

71 

RADAR  TYPE  12  =  SURFACE  SEARCH  TYPE  13  =  AIR  SEARCH 

UMPIRE  VERSION  OF  RADAR  DETECTIONS,  UNIT  71 

ID  TYPE  RADAR  CSE  X  GRID  Y  GRID  SPEED  COMP  CPA  RGE  &  BRG 
333  2333  12  90  513  480  11  1  11  67 

2 .  Red/Blue  Cartesian  Plot 

For  each  terminal,  a  plop  of  all  the  side's  forces 

in  a  1000  by  1000  mile  cartesian  plot  in  the  positive  quadrant 

is  provided.  All  detections  which  specified  an  (X,Y)  position 
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are  also  plotted  on  this  page.  The  two  sides'  units  are 
plotted  with  different  symbols  ("+"  and  This  is 

distributed  to  the  players. 

3 .  Status  of  Forces  Table 

Each  side  receives  page  3  which  lists  their  forces 
and  the  current  game  time  in  hours  and  minutes.  An  example 


is  provided  below: 


STATUS  OF 

FORCES 

AS  OF 

8 

HRS. 

30  MIN 

UNIT 

SPEED 

DEPTH 

COURSE  X 

Y 

TYPE 

MAX 

MAX 

MAX 

MAX 

ID 

KTS 

/HT 

DEG  T 

GRID 

GRID 

SPD 

S/S 

A/S 

SNR 

50 

30 

0 

265 

476 

478 

1332 

34 

25 

150 

10 

51 

10 

0 

265 

530 

488 

1333 

35 

20 

150 

10 

52 

10 

0 

265 

532 

448 

1346 

34 

20 

150 

10 

60 

7 

1 

100 

555 

467 

1110 

30 

100 

0 

30 

0 

0 

20 

90 

900 

500 

1281 

450 

200 

0 

0 

71 

10 

1 

225 

493 

472 

1293 

120 

30 

30 

2 

The  last  four  columns  are  the  maximum  speed  and  sensor 
ranges  for  the  unit  in  question.  Note  that  the  fifth  is 
out  of  play. 

4 .  Umpire's  Cartesian  Plot 

A  plot  of  all  the  units  in  the  game  including  those 
out  of  play  is  provided  on  each  terminal's  output.  The 
format  is  the  same  as  that  for  the  players .  The  copies 
from  both  terminals  should  be  identical.  Two  are  provided 


> 

I 


If or  the  convenience  of  the  Control  Group. 

5.  Data  Base  Printout 

File  FT02F001  is  printed  out  on  each  terminal  as  it 

i 

I  appears  following  the  execution  of  TURN  but  without  the 

updating  accomplished  in  the  CHANGE  program.  Each  terminal's 
copy  should  be  identical.  Both  copies  are  provided  for 
Control  Group  use. 

L ...  in  i.fr 
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E .  PROGRAM  FAILURES 

Only  tvro  kinds  of  program  failures  should  occur  in 
CASTAG.  Either  a  data  entry  error  in  the  interactive  phases 
or  a  CP/CMS  shutdown  may  cause  termination  of  the  program. 
The  critical  consideration  in  restarting  CASTAG  is  that 
both  programs  in  two  different  terminals  must  be  kept  exe¬ 
cuting  together.  Suggestions  for  dealing  with  some  of  the 
various  possibilities  are  provided  in  this  section. 

1.  Data  Entry  Error 

Data  entries  to  the  EXEC  routine  cannot  normally 
cause  termination  as  illegal  entries  cycle  the  program 
back  to  the  input  statement.  Entry  of  the  wrong  side, 
i.e.,  "R"  vice  "B"  or  wrong  user  ID  will  prevent  any  file 
transfers.  To  recover,  terminate  the  EXEC  and  manually 
make  the  required  transfer.  Next  turn  the  programs  can  be 
restarted  together. 

Although  only  three  entries  are  required  for  SEARCH, 
these  may  have  the  most  damaging  effect  as  some  illegal 
character  entries  are  read  as  zero.  If  the  TURN  program 
terminates,  the  CASTAG  EXEC  may  be  restarted.  "1"  and  "2" 
are  the  only  entries  accepted  for  Red/Blue  terminal  desig¬ 
nation.  Should  both  terminals  enter  the  same  number,  stop 
execution  and  restart  execution  with  "CASTAG  EXEC".  A 
time  of  zero  will  cause  no  movement  or  detections  and  again, 
the  program  may  be  restarted.  The  worst  case  is  if  the 
programs  start  with  two  different  times.  The  original  data 
base  will  be  irrevocably  changed  to  reflect  movement.  Short 


of  retyping  the  data  base  the  only  solution  is  to  have 
the  terminal  with  the  shorter  time  execute  SEARCH  for  the 
difference.  The  only  effect  on  the  game  would  be  one  more 
HFDF  segment  for  the  terminal  executing  twice. 

CHANGE  is  where  most  errors  usually  occur  due  to 
the  large  number  of  entries  required.  All  entries  to 
CHANGE  with  the  exception  of  the  first  may  be  changed  again 
and  again  until  the  user  terminates  the  program.  The  first 
entry  which  tells  the  program  if  it  is  Red  or  Blue  will 
cause  an  error  if  the  number  does  not  match  that  entered 
in  SEARCH.  If  CHANGE  does  terminate,  it  can  be  restarted 
with  "CHANGE".  The  rest  of  the  EXEC  will  have  to  be  done 
manually  until  it  is  time  to  start  the  next  turn.  Then 
CASTAG  EXEC  can  be  restarted  to  get  both  terminals  back 
together . 

2.  CP/CMS  Failure 

When  a  CP/CMS  failure  occurs,  immediately  check  to 
see  what  condition  file  FT02F001  (the  data  base)  is  in.  If 
both  terminals  were  exactly  in  step  and  CP/CMS  went  down 
just  after  the  file  was  rewound  on  both  terminals  but 
before  the  information  was  written  back  on  the  file,  the 
data  base  will  be  lost. 

Assuming  the  data  base  is  intact  on  one  terminal. 


execute  CASTAG  from  the  top  utilizing  the  data  base  trans¬ 
fer  section.  The  critical  consideration  is  that  both  ter¬ 
minals  always  start  from  identical  data  bases. 


V.  FUTURE  DEVELOPMENT  AND  RESULTS 


A.  IMPROVEMENTS  AND  EXTENSIONS  OF  CASTAG 

Future  work  on  CASTAG  falls  into  three  major  cate¬ 
gories.  First,  there  is  the  inclusion  of  those  parts  of 
SEATAG  not  programmed.  Second  is  improvements  to  facilitate 
play  and  umpire  functions  of  the  part  of  the  game  now 
covered.  Last,  improvements  to  the  program  to  use  less 
core  and  improve  programming  efficiency  should  be  con¬ 
sidered. 

1.  Tactical  Improvements 

In  SEATAG,  surface  units  with  two  air  search  radars 
are  given  no  more  capability  than  a  unit  with  only  one. 

Units  with  the  dual  capability  should  have  some  kind  of 
enhanced  detection  capability  against  air  targets. 

The  time  constraint  forced  the  omission  of  sonobuoy 
fields  for  ASW  aircraft.  These  are  treated  as  static 
detection  areas  in  the  game  with  a  different  detection 
methodology.  Currently,  they  could  be  played  manually  in 
conjunction  with  CASTAG  by  the  Control  Group. 

To  make  CASTAG  a  complete  game  requires  the  pro¬ 
gramming  of  the  SEATAG  engagement  and  damage  methodology. 

In  the  author's  opinion,  an  effort  approximating  the  work 
done  on  this  project  would  be  required  to  accomplish  this. 

2 .  Display  and  Bookkeeping  Improvements 

The  Control  Group  is  required  to  monitor  aircraft 
and  diesel  submarine  time  on  station  to  nrevent  unrealistic 


mission  lengths.  Time  on  station  or  time  submerged  could 
easily  be  kept  in  one  of  the  unused  columns  of  the  DATA 
array . 


To  facilitate  play  of  aircraft,  the  SEATAG  aircraft 
carrier  packages  would  speed  play  and  reduce  the  number  of 
units  devoted  to  air  assets.  If  the  Blue  player  wants  to 
use  the  SEATAG  CV  around  the  clock  defensive  package  with 
a  strike  or  cap  surge,  he  will  have  to  operate  fifteen  plus 
aircraft.  The  CV  begins  to  approach  the  program  limit  of 
total  units  in  a  carrier  strike  warfare  environment.  In 
conjunction  with  programming  the  packages,  multiple  units 
where  10  strike  aircraft  would  be  one  unit  of  composition 
10  would  be  introduced. 

The  1000  by  1000  mile  plots  should  be  made  variable 
so  the  players  can  enter  a  midpoint  and  radius  to  designate 
the  plot  limits.  Since  most  engagements  take  place  at 
ranges  less  than  100  miles,  a  smaller  scale  output  centered 
around  the  area  of  interest  would  be  an  improvement. 

The  player  output  should  include  a  current  range 
calculation  whenever  the  (X,Y)  position  is  given.  As  it 
now  stands,  the  players  have  to  make  this  determination 
themselves . 

3.  Programming  Improvements 

The  input  screening  and  interactive  sequences  have 
ample  room  for  improvement.  Some  could  be  eliminated, 
particularly  two  of  the  three  inputs  telling  the  terminal 
whether  it  is  Red  or  Blue. 
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The  arrays  RADAR,  SONAR,  ESMDET,  INTELL  and  HFDF 
are  redundant.  Their  function  could  have  been  handled  by 
one  array. 

There  are,  no  doubt,  other  inefficiencies  the  dis¬ 
cerning  programmer  could  spot. 

B .  RESULTS 

The  SEATAG  Documentation  suggests  lunch  breaks  and 
related  lectures  as  a  way  to  utilize  the  time  the  two  sides 
will  spend  waiting  for  the  umpires  to  finish.  This  is  an 
example  of  the  principal  difficulty  with  a  manual  wargame, 
the  time  factor. 

CASTAG  reduces  the  time  to  play  a  turn  of  SEATAG  to 
less  than  fifteen  minutes.  All  of  the  time  saved  comes 
from  what  was  essentially  idle  time  for  the  players  while 
the  Control  Group  plotted  the  moves.  The  game  can  be  used 
as  is  in  the  various  wargaming  courses  extant  at  the  Naval 
Postgraduate  School  and  perhaps  elsewhere. 


APPENDIX  A 


ADDITIONAL  UNITS 


Ship  Class /Aircrof  i  Nome-  KRESTA  I  (4) 


RED/afuOe/ 
Tine:  CLG 


CHARACTERISTICS  SENSOR 


FUNCTION 


C  AIR  RDR 


NET  AIR  RADAR 


weaponSi  function 


FlO/MTQW(T):  flQOn 

L(tt): _ 510 _ 

W/B(ft ) :  _§6 _ 

D/Htft).  20 

Ceiling  (hf  t): _ 

Spd.  Mos(kt):  35 

Cruise(kt): _ 

Patrol  { kt) :  18 

Mission 

Time{tu):20  day  .  I SA-N-1 
Endurance  1  5 'Ann  GUNl  AAW 

at  Cruise(nm)55flil |2Chin  GLN 


Remarks .  MBU250Q  ASW 

4  BOILERS  NBU4500  TaSW 

TURBINES-2  121 "IT 

100,000  SHP  i #170  NM 


SENSOR  ,  FUNCTION 

I  Good  !  Bod  I  I  I  Good  I  Bad 


150  75  I  MUFF 


150  75  I  BASS 


PAIR 


10  2 


#  LAUNCHERS  #  8ARRELS,  TOTAL  RANGE  *  (nm 
or  MOUNTS  I  RAILS  PER  STS  I  WPNS  (  Min  I  Mas 


NOTES:  *  Thest  >otionol  values  ore  not  necessarily  precise.  They  are 

consiaered  representative  and  provided  tor  gome  purposes  only  . 


TOKENS 


Ship  Class  /Aircraft  Name  KYNDA  CLASS  (  4 ) 


CHARACTERISTICS 


SENSOR 


RED/ BLUE 
Title:  CLG 


„  RANGE  *(nm) 

FUNCTION 


L(ft): _ 468 

W/B  (ft) : _ 52 

0/H(ft): _ 12 

Ceilmg(kft): _ 

Spd:  Max(kt): _ 

Cruise (kl): _ 

Patrol  (kt): _ 

Mission 

Time(hr):  15  day 
Enduronce  76tim  GU 

at  Cruise(nm)  7000  yjBU2500 


Remarks : 

4  BOILERS 
2  TURBINES 
100,000  SHP 


DON 

SURF  RADAR 

HEAD  NET 

A  AIR  RDR 

SONAR 

ASW 

WEAPONS,  FUNCTION 


#  LAUNCHERS  #  BARRELS,  TOTAL  RANGE *(nm 
or  MOUNTS  i  RAILS  PER  SYS  I  WPNS  I  Min  I  Max 


2 


r/ASUW 


3 


IGETING 


NOTES  :  *  These  notional  values  are  not  necessarily  precise  .  They  ore 

considered  representative  and  provided  for  game  purposes  only. 


TOKENS 


APPENDIX  B 
CHANGE  OUTPUT 


EXECUTION  BEINGS . . . 

ENTER  1  FOR  RED,  2  FOR  BLUE,  FORMAT  111. 


>1 

IT  IS  360.  Z  TIME,  YOU  HAVE  6  UNITS. 

ENTER  THE  ROW  NUMBER  OF  THE  UNIT  YOU  WISH  TO  CHANGE  THE 
STAUTS  OF,  112,  "0"  WILL  INDICATE  NO  CHANGES  TO  ANY  UNIT. 

>03 

CODE  UNIT  ID-  52 

2  SPEED  IS  10  KIS. 

3  ALT/DEPTH=  0*10* *3  /  l=SHALLOW, 2=DEEP . 

4  COURSE  is  80  T. 

5  SURFACE  SEARCH  RADAR:  0  l=ON . 

6  AIR  SEARCH  RADAR:  0  0=OFF. 

7  SONAR:  0 

8  HF  COMMUNICATIONS:  0 

ENTER  THE  CODE  NUMBER  OF  THE  LINE  YOU  WANT  TO  CHANGE, 

111.  "  0"  MEANS  NO  CHANGES  TO  THIS  UNIT. 

>5 

ENTER  THE  NEW  VALUE  FOR  CODE  NO.  5,  114. 

>0001 

CODE  UNIT  ID=  52 

2  SPEED  IS  10  KTS . 

3  ALT/DEPTH=  0*10**3  /  l=SHALLOW, 2=DEEP . 

4  COURSE  IS  80  T. 

5  SURFACE  SEARCH  RADAR:  1  l=ON. 

6  AIR  SEARCH  RADAR:  0  0=OFF. 

7  SONAR :  0 

8  HF  COMMUNICATIONS:  0 

ENTER  THE  CODE  NUMBER  OF  THE  LINE  YOU  WANT  TO  CHANGE, 

111.  ”  0”  MEANS  NO  CHANGES  TO  THIS  UNIT. 

>0 

IT  IS  360.  Z  TIME,  YOU  HAVE  6  UNITS. 

ENTER  THE  ROW  NUMBER  OF  THE  UNIT  YOU  WISH  TO  CHANGE  THE 
STATUS  OF,  112,  "0"  WILL  INDICATE  NO  CHANGES  TO  ANY  UNIT. 


>0 

IF  YOU  WISH  TO  BRING  AN  OUT  OF  PLAY  UNIT 
INTO  PLAY  OR  PUT  A  UNIT  OUT  OF  PLAY  (  I.E.  SINK  IT) , 
ENTER  THE  ROW  NUMBER  OF  THAT  UNIT,  112.  "0"  MEANS 
NO  UNITS  TO  PUT  IN  OR  OUT  OF  PLAY. 


>05 
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CODE  UNIT  ID=  0 

2  SPEED  IS  0  KTS . 

3  ALT/ DEPTH =  20*10**3  /  l=SHALLOW, 2=DEEP . 

4  COURSE  IS  90  T. 

ENTER  THE  NEW  UNIT  ID  ,114.  “0"  PUTS  THE  UNIT 

OUT  OF  PLAY.  ANY  OTHER  VALUE  BRINGS  THE  UNIT  INTO 
PLAY  WITH  THAT  ID  NUMBER. 

>0077 

UNIT  5  IS  NOW  AT  900  500 

ENTER  FORMAT  14  FIRST  THE  NEW  X  COORDIANTE 

THEN,  AFTER  THE  SECOND  APPEARS,  THE  NEW  Y  COORDINATE. 

>  100 
>  100 

IF  YOU  WISH  TO  BRING  AN  OUT  OF  PLAY  UNIT 
INTO  PLAY  OR  PUT  A  UNIT  OUT  OF  PLAY  (  I.E.  SINK  IT), 
ENTER  THE  ROW  NUMBER  OF  THAT  UNIT,  112.  "0"  MEANS 
NO  UNITS  TO  PUT  IN  OR  OUT  OF  PLAY. 


>  3 
CODE 
2 

3 

4 


UNIT  ID=  52 
SPEED  IS  10  KTS. 

ALT/DEPTH=  0 *10**3  /  l=SHALLOW, 2=DDEP . 
COURSE  IS  80  T. 


ENTER  THE  NEW  UNIT  ID  , 114 .  "0”  PUTS  THE  UNIT 

OUT  OF  PLAY.  ANY  OTHER  VALUE  BRINGS  THE  UNIT  INTO 
PLAY  WITH  THAT  ID  NUMBER. 


IF  YOU  WISH  TO  BRING  AN  OUT  OF  PLAY  UNIT 
INTO  PLAY  OR  PUT  A  UNIT  OUT  OF  PLAY  (  I.E.  SINK  IT), 
ENTER  THE  ROW  NUMBER  OF  THAT  UNIT,  112,  "0"  MEANS 
NO  UNITS  TO  PUT  IN  OR  OUT  OF  PLAY. 


R;  T=0 . 92/2 . 63  10.38.02 
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